在窗体上画一个名称为Coramandl的命令按钮，然后编写如下程序； Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then Y=X Else Y=20+X End If func=Y End Function Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim a As Boolean SW=False End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW=True End Sub Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox("") If SW Then Print flmc(intNum) End If End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为

A．输出0

B．输出2

C．输出45

D．无任何输出

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then Y=X Else Y=20+X End If func=Y End FunctiOn Phvate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False End Sub P

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：D．im SW As BooleanF．unction func(X As Integer) As IntegerIf X＜20 ThenY=XE．lseY=20+XE．nd Iffunc=YE．nd FunctionPrivate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)SW=FalseE．nd SubPdvate

[单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:D．im SW As BooleanF．unction func(X As Integer)As IntegerIf X<20 ThenY=XE．lseY=20+XE．nd Iffunc=YE．nd FunctionPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)SW=FalseE．nd SubP

[单选题]在窗体上画一个名称为Commana1的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then Y=X Else Y=20+X End If func = Y End Function Private Sub Form. MouseDown(Button As Integer,_ Shift As Integer,X As Single, Y As Single) SW = False

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim k As IntegerPrivate Sub form_ Load() k = 15End SubPrivate Sub Command1_ Click()Static b As IntegerDim k As Integer k= k +1 b = b+1 Print k, bEnd Sub程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是______。A．1 1B．1 2C．2 1D．2 2

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim k As Integer Private Sub Form_Load() k=15 End Sub Private Sub Command1_Click() Static b As Integer b=b+k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是( )。A．17 31B．15 31C．17 16D．2 1

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：D．im k As IntegerPrivate Sub Form_Load()k=15E．nd SubPrivate Sub Command1_Click()D．im b As Integerb=b+kk=k+1Print k,bE．nd Sub程序运行时，两次单击命令按钮Command1后，在窗体上输出的第二行是( )。A．17 31B．15 31

[单选题]在窗体上画一个命令按钮,名称为Commandl。然后编写如下程序:Private Sub Commandl_Click()F．or I=1 T0 2F．or J=1 To IPrint String(I,″Hello″);Next JPrintNext IE．nd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A．H HH HHB．H HHHHC．HHHHHD．H HH HHHH

[单选题]在窗体上画一个命令按钮，名称为Commandl。然后编写如下程序： Private Sub Command1_Ctick() For I=1 TO 2 For J=1 TO I Print String(I，"Hello")； Next J Print Next I End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是A． H HH HHB． H HHHHC． HHHHHD．H HH HHHH

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：Private Sub Commandl_Click()D．imi As Integer,j As IntegerD．ima(10,10)As IntegerF．ori=1 To 3F．orj=1 To 3a(i，j)=(i-1)*3+jPrinta(i，j)；NextjPrintNextiE．nd SubA．B．C．D．