2. 计算机
  3. 在窗体上画1个命令按钮，名称为Commandl，然后编写如下程序： Dim Flag As Boolean Private Sub Command l_Click( ) Dim intNum As Integer intNum=InputBox(“

在窗体上画1个命令按钮，名称为Commandl，然后编写如下程序： Dim Flag As Boolean Private Sub Command l_Click( ) Dim intNum As Integer intNum=InputBox(“

admin2018-09-19  31
问题 在窗体上画1个命令按钮，名称为Commandl，然后编写如下程序：
Dim Flag As Boolean
Private Sub Command l_Click(     )
Dim intNum As Integer
intNum=InputBox(“请输入：”)
IfFlag Then
Print f(intNum)
End If
End Sub
Function f(X as Integer)As Integer
IfX＜10 Then
Y=X
Else
Y=X+10
EndIf
f=Y
End Function
Private Sub Form_MouseUp(Button As Imeger,Shift As
Integer,X as Single，Y As Single)
Flag=True
End Sub
运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为(     )。
选项 A、0
B、5
C、15
D、无任何输出
答案B
解析 考查If语句和函数过程的分析。函数过程f的功能是如果X小于10则返回X，否则返回X+10。窗体的MouseUp事件是松开鼠标时触发的事件。程序运行后，单击窗体，则全局变量Flag的值为True，然后单击命令按钮，在输入对话框中输入5，执行If分支语句，调用f函数，由于5＜10，因此输出x，即输出5。
转载请注明原文地址:https://www.kaotiyun.com/show/LmFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)