内容正文:
《自定义函数综合应用》导学案
[考试要求]
1.自定义函数 (c)
[学习目标]
1. 理解VB应用程序的模块化。
2. 能够正确构建自定义函数和过程。
3. 正确使用VB中的自定义函数和过程,以解决实际问题。
[自主学习]
1、 知识梳理
1.过程的调用(包括事件处理过程)通过” ”完成对过程的调用。
2.事件处理过程名是X_Y,X是 ,Y是 。
3.常见的标准函数有 (至少写出三个)。
4.在语句块中,一般要有形如“ ”的语句,其作用就是将语句块的计算结果作为函数返回值,送到函数的调用点上。
二、自我检测
1.小明在VB中定义了以下函数,功能是求a和b的最大公约数。
Function gcd(a As Integer, b As Integer) As Integer
Do While b>O
c=a Mod b
a=b
b=c
Loop
End Function
调试中发现计算结果一直是0。经过仔细观察与分析,发现错误的原因是( )
A.函数名有错 B.变量C没有定义 C.函数没有返回值 D.b>0应该改为b>=0
2.有如下VB程序段:
Private Sub Text1_Change()
Dim m As Integer, i As Integer
m = Val(Text1.Text)
For i = 1 To 3
If m <= 9 Then
m = m + i
End If
Next i
Text1.Text = Str(m)
End Sub
当在文本框Text1中输入2,则显示的结果为( )
A.8 B.10 C.11 D.12
[课堂练习]
1.某VB应用程序的两个事件过程如下:
Private function out(x as integer,y as integer,z as integer) as integer
Dim temp as integer
If x>y then temp=y else temp=x
If temp>z the