在窗体上画1个命令按钮,名称为Command1,然后编写如下程序: DimFla

[单选题]

在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：

D．im Flag As Boolean

Private Sub Command1_Click（）

D．im intNum As Integer

intNum=InputBox（"请输入："）

If Flag Then

Print f（intNum）

E．nd If

E．nd Sub

F．unction f（X As Integer）As Integer

If X<10 Then

Y=X

E．lse

Y=X+10

E．nd If

f=Y

E．nd Function

Private Sub Form_MouseUp（Button As Integer,Shift As Integer,X As Single,Y As Single）

F．lag=True

E．nd Sub

运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为（）。

A．0

B．5

C．15

D．无任何输出

在窗体上画1个命令按钮,其名称为Command1,然后编写如下程序: Priva: [单选题]在窗体上画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,然后编写如下程序: Dim Fl: [单选题]在窗体上画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 En

查看答案

在窗体上画1个命令按钮,其名称为Command1,然后编写如下程序: Priva: [单选题]在窗体上画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

查看答案

在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:Dim Fla: [单选题]在窗体上画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

查看答案

( 33 )在窗体上画 1 个名称为 Command1 的命令按钮,然后编写如下: [单选题]（ 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．

查看答案

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

查看答案

在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private: [单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click()Dim a As Integer, b As Integerb = 1for a = 1 To 100 if b＞= 10 then exit for if b Mod 3 = 1 then b=b+3 End ifNext aPrint aEnd Sub在命令按钮上单击后，窗体上显示的结果是______。A．101B．6C．5D．4

查看答案

在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:Private: [单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_ Click()Dim a As Integer, b As Integerdo while b ＜100 b=b+5 a=a+ b if b ＞20 then exit doLoopPrint a, bEnd Sub程序运行后，如果甲击命令按钮，则在窗体上显示的内容是______。A．50 20B．75 25C．50 25D．75 20

查看答案

在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private: [单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click() for i = 1 To 4 for j= 0 To i Print Chr＄(65 +i) Next j Print Next iEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。A．BB CCC DDDD EEEEEB．B CC DDD EEEEC．AA AA CCCC DDDDDD．A BB CCC DDDD

查看答案

在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private: [单选题]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer If a=0 Then x=x-1 Else If b＜＞0 Then End If End If If c＜＞0 Then x=3 Else x=4 End If Print x End Sub 程序运行后，单击命令按钮，其输出结果为 ______。A．34B．4C．35D．3

查看答案