网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有如下程序：
Private Sub Command1_Click（）
Dim a As Integer
a=2
For i=1 To 3
Print Gad （A．
Next i
End Sub
Function Gad （a As Integer）
b=0
Static c
b=b + 1
c=c + 1
Gad=a + b + c
End Function
运行上面的程序后，单击命令按钮，输出结果为（ ）。
A．1
2
3
B．2
3
4
C．4
5
6
D．1
4
6
参考答案
更多 “ 有如下程序：Private Sub Command1_Click（）Dim a As Integera=2For i=1 To 3Print Gad （A．Next iEnd SubFunction Gad （a As Integer）b=0Static cb=b + 1c=c + 1Gad=a + b + cEnd Function运行上面的程序后，单击命令按钮，输出结果为（ ）。A．123B．234C．456D．146 ” 相关考题
考题
有如下程序：Private Sub Command1_Click（）a$= "A WORKER IS HERE"x=Len（a$）For i=1 To x - 1b$=Mid$（a$, i, 3）If b$= "WOR" Then S=S + 1NextPrint SEnd Sub单击命令按钮，程序运行结果为（ ）A．1B．2C．3D．5
考题
有如下程序：Private Sub Command1_Click()a$="A WORKER IS HERE"x=Len(a$)For i=1 To x-1b$=Mid$(a$，i，3)If b$="WOR"，Then S=S+1NextPrint SEnd Sub单击命令按钮，程序运行结果为AA．1B．2C．3D．5
考题
有如下程序:Private Sub Command1_Click()a$="A WORKER IS HERE"x=Len(a$)For i=1 To x - 1b$=Mid$(a$, i, 3)If b$="WOR" Then S=S + 1NextPrint SEnd Sub单击命令按钮，程序运行结果为A．1B．2C．3D．5
考题
有如下程序：Private Sub Command1_Click()j =10For i= -1 To 1 Step 0.3j =j + 1Next iPrint jEnd Sub该程序共循环【 】次，程序执行完毕后j的值是【 】。
考题
有如下程序： Private Sub Command1_Click() as="A WORKER IS HERE" x = Len(a$) For i=1 To x - 1 b$ =Mid$(a$, i,3) If b$ ="WOR" Then S=S+ 1 Next Print S End Sub 单击命令按钮，程序运行结果为A．1B．2C．3D．5
考题
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i = 1 To 2 For j = 1 To i Print String(i, "Hello") Next j Print Next i End SubA．H HH HHB．H HHHHC．HHHHH HH HHHHD．H
考题
有如下程序： Private Sub Commandl_Click() Dim a As Integer a=2 For i=1 To 3 Print Gad (A)Next i End Sub Function Gad (a As Integer) b=0 Static c b=b + 1 c= c + 1 Gad= a + b + C End Function 运行上面的程序后，单击命令按钮，输出结果为A．1 2 3B．2 3 4C．4 5 6D．1 4 6
考题
在窗体上画一个命令按钮，然后编写如下程序 Private Sub Command1_Click( ) Dim a As Integer，b As hiteger a=1 b=2 Print N(a，B)End Sub Function N(x As Integer，y As Integer)As Integer N=IIf(xy，x，y) End Function 程序运行后，单击命令按钮，输出结果为A．1B．2C．5D．8
考题
有如下程序： Private Sub Command1_Click( ) a$="A WORKER IS OVER THERE" x=Len(a ＄) For i=1 To x-1 b$=Mid $(a $，i，2) If b $="ER"Then s=s+1 Next i Pdnt s End Sub 程序运行后的输出结果是A．1B．2C．3D．4
热门标签
最新试卷