2. 计算机
  3. 在窗体上画1个命令按钮，名称为Command1，然后编写如下程序： Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Inte

在窗体上画1个命令按钮，名称为Command1，然后编写如下程序： Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Inte

admin2013-04-11  57
问题 在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：         Dim Flag As Boolean         Private Sub Command1_Click()            Dim intNum As Integer            intNum=InputBox(“请输入：”)            If Flag Then                   Print f(intNum)            End If         End Sub         Function f(X as Integer)As Integer            If X＜10 Then                    Y=X            Else                    Y=X＋10            End If            f=Y         End Function         Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X as Single,Y As Single)            Flag=True         End Sub    运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。
选项 A、0
B、5
C、15
D、无任何输出
答案B
解析 单击窗体在释放鼠标时，将会触发Form_MouseUp事件，将Flag值置True，从而允许输出。在Command1的Click事件中，通过输入框输入5，并在窗体上输出f(5)，函数f的作用是，如果自变量x＜10，则直接返回 x，否则返回x＋10。故本题应输出5。
转载请注明原文地址:https://kaotiyun.com/show/uOhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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