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

admin2012-03-22  30

问题 在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:    Dim Flag As Boolean    Private Sub Command1_Click()      Dim intNum As Integer      intNum=InputBox("请输入:")      If Flag Then       Printf(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

解析
转载请注明原文地址:https://jikaoti.com/ti/AmO0FFFM
0

最新回复(0)