1 / 5
文档名称:

高三算法复习九(过程函数).doc

格式:doc   大小:95KB   页数:5页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

文档介绍:高三算法复习九(过程函数).doc高三算法复习九(过程函数)
2015样卷
1、程序运行界面如图所示。要求在文本框Textl中输入字符串,单击"统计”按钮Command 1 后,在标签Label2中显示所输入字符串长度。需要编写的VB事件处理过程的名称为 ( )
B. Textl_Click
D. Label2_Click
A. Command 1 _Click
C ・ Form_Click

【解析】所考知识点:事件处理过程。事件处理过程名的命名规则:对象名一事件的标准 名,本题中在对象按钮Command 1上激发事件Click (鼠标单击),VB中事件处理过程为 Command 1 _Clicko还有一些事件处理过程如Textl_Change (文本框内容变化)、Form_Load (窗体装载)等。
5、下列VB程序模块用来判断年份y是否是闰年。回答以下两个问题
Function leap(y As Integer) As Boolean
If y Mod 100 = 0 Then
If y Mod 400 = 0 Then leap = True Else leap = False
Else
If y Mod 4 = 0 Then leap = True Else leap = False
End If
End Function
.该函数的计算结果返回值的数据类型是( )
A.整型 B.实数型 C.字符串型
.调用该函数进行计算,以下程序段中空白处应填写的语句是(
Private Sub Command l_Click()
Dim n As Integer n = Val(Textl .Text) If Then
Text2.Text=M 是闰年”
Else
Text2.Text=H 不是闰年”
D.逻辑型
A. leap(y) C.y
B. leap(n)
D. n

End If
End Sub

10、 自定义函数Fa用来返回输入参数的绝对值。则下划线处应该输入的是( )
Function Fa(X As Double) As Double
If Then
Fa = -X
Else
Fa 二 X
End If
End Function
A. X<0 B. X>0 C. X=0 D. X<>0
11、 下列VB程序运行时,单击命令按钮Commandl后,文本框Textl中显示的内容是
Private Sub Command 1 _Click()
Dim a(l To 10) As Integer, i As Integer, s As Integer
a(l) = 1: a(2) = 1
For i = 3 To 10
a(i) = a(i - 1) + a(i - 2)
Next i
Textl.Text = Str(a(10))
End Sub
12、随机产生100个1〜100之间的整数,fun函数用来判定一个数的奇偶性。如果是奇数 函数返回1,若是偶数便返回0,相应的程序如下,在程序①和②划线处,填入适当的语 句或表达式,把程序补充完整。
程序中①划线处应填入
程序中②划线处应填入
Function fun(m As Integ

分享好友

预览全文

高三算法复习九(过程函数).doc

上传人:蓝天 2021/9/15 文件大小:95 KB

下载得到文件列表

高三算法复习九(过程函数).doc

相关文档