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

浙江高中信息技术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 =

相关文章:
2018届浙江省信息技术选考复习自定义函数专题答案
2018届浙江省信息技术选考复习自定义函数专题答案_其它课程_高中教育_教育专区。...小明编写 VB 程序,实现如下功能:在文本框 Text1 中输入十进制数,单击按钮,在...
浙江省信息技术学考VB 阶段练习(一)
浙江省信息技术学考VB 阶段练习(一)_其它课程_高中教育_教育专区。浙江省信息...编写程序,求函数 Y 的值(当 x≤0 时,y=3x+1;当 x>0 时,y=4x+1) ...
浙江信息技术学考VB函数与表达式习题
浙江信息技术学考VB函数与表达式习题_其它课程_高中教育_教育专区。班级: 题号 答案 题号 答案 11 12 13 1 2 3 VB 函数及表达式 姓名: 4 14 5 15 6 16...
2015年浙江省信息技术学考知识点整理VB必考部分
2015 年浙江省高中学业水平考试信息技术知识点整理 VB 必考部分 一、.算法及其实现 (1)基本概念 “算法”指的是解题方法的精确而完整的描述,由有限个步骤组成。...
浙江省信息技术学考VB模块基础检测(附参考答案)
浙江省信息技术学考VB模块基础检测(附参考答案)_其它课程_高中教育_教育专区。...子程序或函数定义 C.要求对象 D.溢出 14.已知文本框对象 Text1 的 Text ...
2016年浙江省信息技术学业水平考试VB知识点
2016年浙江省信息技术学业水平考试VB知识点_其它课程...对象的属性定义其外观,方法定义其行为,事件定义其与...常用函数、一维数组 ◆VB 基本数据类型 类型 符号 ...
2015浙江省信息技术学业水平考试VB知识点
2015浙江省信息技术学业水平考试VB知识点_其它课程_高中教育_教育专区。2015 浙江省信息技术学业水平考试 VB 知识点一、基本数据类型 下表是 VB 基本数据类型表,请...
高中信息技术VB专项题(学考)
中的 Command1 是对象名,Click 是事件名,Command1_Click 则是事件处理过程的...浙江信息技术学考VB函数... 2页 免费 高中信息技术VB会考上机... 3页 1...
浙江高中信息技术知识点
浙江高中信息技术知识点_其它课程_高中教育_教育专区。高中信息技术知识点第一章...(1)基于程序设计的自动化信息加工,如 VB、C、JAVA 语言等 (2)基于大众信息...
高中信息技术VB试题及答案
高中信息技术VB试题及答案_其它课程_高中教育_教育专区。VB 1.下面选项内不属于...主程序、子程序、函数 35.对于一个类,用户能定义的构造方法的个数可以为( B...
更多相关标签: