在窗体上画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．无任何输出

[单选题]在窗体上画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 E

[单选题]在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：D．im Flag As BooleanPrivate Sub Command1_Click（）D．im intNum As IntegerintNum=InputBox（"请输入："）If Flag ThenPrint f（intNum）E．nd IfE．nd SubF．unction f（X As Integer）As IntegerIf X<10 ThenY=XE．lseY=X+10E．nd Iff=YE．nd F

[单选题]在窗体上画一个名称为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

[单选题]在窗体上画一个名称为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

[单选题]在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序：Private Sub Command1_Click（）D．im a（10）As IntegerD．im x As IntegerF．or i=1 To 10a（i）=8+iNextx=2Print a（f（x）+x）E．nd SubF．unction f（x As Integer）x=x+3f=xE．nd Function程序运行后，单击命令按钮，输出结果为（ ）。A．12B．15C．17D．18

[单选题]在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序： Private Sub Command1 Click() Dim a(10) As Integer Dim x As Integer For i=1 To 10 a(i)=8+i Next x=2 Print a(f(x)＋x) End Sub Function f(x As Integer) x=x＋3 f=x End Function 程序运行后，单击命令按钮，输出结果为______。A．12B．15C．17D．18

[单选题]（ 33 ）在窗体上画 1 个名称为 Command1 的命令按钮，然后编写如下事件过程Option Base 1Pribate Sub Command1_Click （）D．im a （ 5.5 ） As IntegerF．or i=1 To 5F．or j=1to5a （ i+j ） *5/10Next jNext is=0F．or i=1 To 5s=s+a （ i,i ）Next iPrint sE．nd Sub程序运行后，单击命令按钮，输出结果是（ ）A． ） 15B． ） 13C．