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

浙江高中信息技术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过程与函数专题练习
VB过程与函数专题练习_高考_高中教育_教育专区。内...VB 自定义函数专题 班级 知识点回顾: 1、VB 编程...浙江信息技术学考VB函数... 796人阅读 2页 1下载...
第19课时:VB过程和函数
VB过程和函数VB过程和函数隐藏>> 浙江省平湖市当湖高级中学信息技术备课组 第 ...能识别和编写自定义函数 ☆☆☆★★ 【要点梳理】 1.模块化程序设计 模块化...
vb函数与过程习题精选
vb函数与过程习题精选_数学_高中教育_教育专区。第三章 函数与过程 习题一、...浙江信息技术学考VB函数... 2页 1下载券 vb过程和函数题型分... ...
2018年浙江选考信息技术:学案48(选考)过程与函数-物理...
2018年浙江选考信息技术:学案48(选考)过程与函数-物理小金刚系列 - 学案 48 (选考)过程与函数 1.某 VB 程序的一个事件过程如下: Private sub Text1_Key...
VB过程方面的练习
VB过程方面的练习_从业资格考试_资格考试/认证_教育专区。1 简述子过程和函数过程的共同点和不同之处。 答:子过程和函数过程的共同点: 函数过程和子过程都是...
...子过程和函数过程B.Sub过程,函_答案_百度高考
百度高考 单选题 在VB中,过程共有三种,它们是( )。 A.事件过程,子过程和函数过程B.Sub过程,函数过程和属性过程C.事件过程,函数过程和通用过程D...
BB平台(VB日常测试)过程与函数
函数| 测试| 平台|BB平台(VB日常测试)过程与函数_理学_高等教育_教育专区。使用...要求质数的判断用自定义函数完成。 正确答案 1. Private Function prime(ByVal ...
VB函数与过程
VB 函数与过程 教学目的: 教学目的: 中函数的含义及函数的分类。 1、 熟悉 VB函数的含义及函数的分类。 中用户函数定义及应用。 2、 掌握 VB 中用户...
....事件过程,子过程和函数过程B.Sub 过_答案_百度高考
百度高考 单选题 在VB中,过程共有三种,它们是___。 A.事件过程,子过程和函数过程B.Sub 过程, Function 过程和 Property 过程。C.事件...
VB子过程与函数过程
VB过程与函数过程_计算机软件及应用_IT/计算机_专业资料。1.输入年份,给出闰年的判断单过程程序: Private Sub Form_Click() Dim year1%, leap! year1 = ...
更多相关标签: