当前位置:首页 >> 其它课程 >>

浙江高中信息技术VB自定义过程和函数


VB自定义过程和自定义函数 ?自定义过程 VB内部过程(系统提供) 过程名 过程 Private Sub Command1_Click() Dim x As Integer, i As Integer For i = 1 To 5 x = x + i Next i Text1.Text = Str(x) End Sub Sub代表过程 自定义过程——调用自定义过程 Call Private Sub Command1_Click() Dim a As Integer, b As Integer a = 1: b = 9 Call jh(a, b) jh(a, b) Text1.Text = Str(a) End Sub jh(x As Integer, y As Integer) 调用时a和x,就是同一个存储 Sub jh(x As Integer,y As Integer) 单元,x发生改变,a就好发生 改变。 Dim t As Integer 变量b和y也同理。 t = x x = y y = t End Sub 自定义过程——调用自定义过程 Private Sub Command1_Click() Dim a As Integer, b As Integer , c As Integer a = 1: b = 9 :c = -5 Call jh(a, b) Call jh(a, c) Text1.Text = Str(a) End Sub Sub jh(x As Integer,y As Integer) Dim t As Integer t = x x = y y = t End Sub ?自定义过程 自定义函数格式 Function 函数名(参数表) As 类型名 <语句块> [函数名=表达式] End Function 函数体部分实现计算得到一个结果,赋值给函数名! 函数内部至少有一个形如“函数名=表达式”的语句 VB内部函数(系统函数) Private Sub Command2_Click() Dim x As Integer x = -9 y = Abs(x) Text1.Text = Str(y) Abs系统函数 Str系统函数 End Sub 函数有返回值,要赋值给某个变量 自定义过程——调用函数 Private Sub Command1_Click() Dim x As Integer, y As Integer x = -8 y = myabs(x) Text1.Text = Str(y) End Sub 返回 值的 Function myabs(a As Integer) As Integer 类型 If a < 0 Then myabs = -a myabs(x) Else myabs = a myabs(a As Integer) End If x和a,就是同一个存储单元, a发生改变,x也会改变 End Function 统计文本框输入字符中数字的个数 Private Sub Command1_Click() Dim s As String Dim ans As Integer s = Text1.Text __________ Label1.Caption = 数字有 + Str(ans) + 个 End Sub Function fact(x As String) As Integer Dim i As Integer, ch As String fact =

相关文章:
浙江高中信息技术VB自定义过程和函数_图文.ppt
浙江高中信息技术VB自定义过程和函数 - VB自定义过程和自定义函数 ?自定义过
2018届浙江省信息技术选考复习自定义函数专题答案.doc
2018届浙江省信息技术选考复习自定义函数专题答案 - 2018 届第一阶段复习 自定义函数专题 命题人:杜宗飞 班级: 姓名: 学号: 1.小明编写 VB 程序,实现如下功能...
2018年浙江省信息技术选考自定义函数专题二.doc
2018年浙江省信息技术选考自定义函数专题二 - 2018 年浙江省信息技术选考自定义函数专题二 教学班: 姓名: 学号: 1.小李编写了一个程序,用以实现下列功能:在...
浙江技术选考复习VB自定义函数调用专题.doc
浙江技术选考复习VB自定义函数调用专题_其它课程_高中教育_教育专区。命题:杜宗飞 VB 自定义函数专题练习 行政班: 教学班: 姓名: 学号: (1)阅读下面程序,填入...
浙江省 高中 信息技术 学考 VB 知识点 汇总.doc
浙江省 高中 信息技术 学考 VB 知识点 汇总_其它课程_高中教育_教育专区。VB 知识点汇总 鉴湖中学信息组 VB 知识点汇总一. 二. 算法:指解决问题的方法。 ...
浙江省高中vb函数_图文.ppt
浙江省高中vb函数_其它课程_高中教育_教育专区。VB常用转换和字符函数 高中信息技术课件 杜宗飞 VB程序常用的基本数据类型 数据类型名 说明 性质 Integer 整数型 ...
高中信息技术_第二单元VB程序设计复习_浙教版.pdf
高中信息技术_第二单元VB程序设计复习_浙教版_电子/电路_工程科技_专业资料。第...(九)过程、事件处理过程自定义函数考试要求:对所列知识要理解其确切含义及与...
浙江省信息技术学考VB 阶段练习(一).doc
浙江省信息技术学考VB 阶段练习(一)_其它课程_高中教育_教育专区。浙江省信息...编写程序,求函数 Y 的值(当 x≤0 时,y=3x+1;当 x>0 时,y=4x+1) ...
历年浙江信息技术选择题整理之VB基本表达式及常用函数.doc
历年浙江信息技术选择题整理之VB基本表达式及常用函数_其它课程_高中教育_教育专区。“在一个算法的步骤序列中,执行完一个处理步骤后,顺序执行紧跟着的下一个处理...
2016年浙江省信息技术学业水平考试VB知识点.doc
2016年浙江省信息技术学业水平考试VB知识点_其它课程...指的是解题方法的精确而完整的描述,由有限个步骤...常用函数、一维数组 ◆VB 基本数据类型 类型 符号 ...
浙江省高中信息技术选考加试题VB专项练习题五及答案.doc
浙江省高中信息技术选考加试题VB专项练习题五及答案_高考_高中教育_教育专区。浙江省高中信息技术选考加试题 VB 专项练习题五 一、选择题:本大题 13 小题,第...
高中信息技术浙江高考复习资料算法和程序设计.pdf
高中信息技术浙江高考复习资料算法和程序设计_电子/...118 第二单元 VB 程序设计一、知识内容(一) 面向...(九)过程、事件处理过程自定义函数考试要求:对所...
高中信息技术VB复习_图文.ppt
高中信息技术VB复习_高中作文_高中教育_教育专区。VB程序设计 面向对象程序设计(...过程和函数两种 事件处理过程 Sub 事件处理过程名() 语句块 End Sub 自定义...
浙江省高中信息技术选考加试题VB专项练习题十一及答案.doc
浙江省高中信息技术选考加试题VB专项练习题十一及答案_高考_高中教育_教育专区。...是一个自定义函数,则程序运行后的出错信息是: (D)4 (D)C=C+1 (D)click...
浙江省信息技术学考VB模块基础检测(附参考答案).doc
浙江省信息技术学考VB模块基础检测 说明:信息技术选考书本《算法与程序设计》 ,...子程序或函数定义 C.要求对象 D.溢出 14.已知文本框对象 Text1 的 Text ...
2018届浙江信息技术选考VB基础复习题.doc
2018届浙江信息技术选考VB基础复习题_其它课程_高中教育_教育专区。夏令营周练之...(C)- Asc(A) 注意:Mid、Chr、Str 函数的计算结果为字符串类型,其值需要加...
高中信息技术学考VB知识点.doc
自定义函数: Function 函数名(参数表) As 类型名 语句块 End Function 9.VB...高中信息技术《算法与程... 15页 1下载券 2015年浙江省信息技术学... ...
高中信息技术VB专项题(学考).doc
中的 Command1 是对象名,Click 是事件名,Command1_Click 则是事件处理过程的...高中信息技术VB读程题 2页 1下载券 浙江信息技术学考VB函数... 2页 1...
浙江省高中信息技术学考复习之算法(1).pdf
浙江省平湖市当湖高级中学信息技术备课组 《算法与程序设计》模块复习(1) 一、...函数体内必须有一行“函数名=返回值” 自定义函数 例15.有如下VB自定义函数:...
浙江省奉化中学高中信息技术校本课程《算法与程序设计....doc
浙江省奉化中学高中信息技术校本课程《算法与程序设计》VB程序设计初步常用函数的具体使用教案 - 课题 课时 VB 程序设计初步:常用函数的具体使用 一课时 一、常用...
更多相关标签: