题目
在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click() Tcl 2 Tcl 3 Tcl 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x+a Print x; End Sub 程序运行后,单击命令按钮,输出结果为
A.2 3 4
B.2 5 9
C.3 5 4
D.2 4 3
第1题
在窗体上画一个命令按钮,名称为Commandl,然后编写下列程序Private Sub Commandl_Click()For i = 1 To 2For j = 1 To iPrint String(i,"Hello")Next jPrintNext iEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A. H HH HH B. H HHHH C. HHHHH HH HHHH D. H
第2题
在窗体上画一个命令按钮,名称为Command1,然后编写下列程序:
Private Sub Command1_Click()
For i=1 To 2
For j=1 To i
Print String(i,"Hello")
Next j
Next i
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是()。A)B)C)
D)H
A.H HH HH
B.H HHHH
C.HHHH
D.H
第3题
在窗体上画一个名为Command1的命令按钮,然后编写下列程序:
Option Base 1
Private Sub Command1_Click()
Dim Arr
Arr=Array(1,2,3,4,5)
j=1
For i=5 To 1 Step-1
S=S+Arr(i)*j
j=j*10
Next
Print S
End Sub
程序运行后,单击命令按钮,输出结果是()。
A.54321
B.123
C.12345
D.345
第4题
在窗体上画一个命令按钮,然后编写下列程序: Private Sub Command12_Click() Tt 3 End Sub Sub Tt(a As Integer) Static X As Integer X=X * a + 1 Print x; End Sub 连续三次单击命令按钮,输出的结果是
A.1 5 8
B.1 4 13
C.3 7 4
D.2 4 8
第5题
在窗体上画一个命令按钮,然后编写下列程序:
Private Sub Command12_Click()
Tt 3
End Sub
Sub Tt(a As Integer)
Static x As Integer
x=x * a + 1
Print x;
End Sub
连续三次单击命令按钮,输出的结果是()。
A.1 5 8
B.1 4 13
C.3 7 4
D.2 4 8
第6题
在窗体上画一个命令按钮,然后编写下列程序:
Private Sub Command12_Click()
Tt 3
End Sub
Sub Tt(a As Integer)
Static x As Integer
x=x * a + 1
Print x;
End Sub 连续三次单击命令按钮,输出的结果是()。 A.1 5 8
B.1 4 13
C.3 7 4
D.2 4 8
第7题
在窗体上画一个命令按钮,然后编写下列程序 Private Sub Command3_Click() Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后,单击命令按钮,输出结果为
A.2 3 4
B.2 5 9
C.3 5 4
D.2 4 3
第8题
在窗体上画一个命令按钮Command1,然后编写下列代码:
Private Sub Command1_Click()
Dim Arr1(10) As Integer,Art2(10) As Integer
n=3
For i=1 To 5
Arr1(i)=i
Arr2(n)=2*n+i
Next i
Print Arr2(n);Arr1(n)
End Sub
运行程序后,单击命令按钮,输出结果是()。
A.11 3
B.3 11
C.13 3
D.3 13
第9题
在窗体上画一个命令按钮Commandl,然后编写下列代码: Private Sub Commandl_Click() Dim Arrl(10)As Integer,Arr2(10)As Integer n=3 For i=1 To 5 Arrl(i)=i Arr2(n)=2*n+1 Next i Print Arr2(n);Arrl(n) End Sub 运行程序后,单击命令按钮,输出结果是A.11 3 B.3 11 C.13 3 D.3 13
第10题
在窗体上画一个命令按钮,然后编写下列程序: Private Sub Command1 click() Dim a As Single,b As Single a=6:b=2 RC a,b Print a,b End Sub Sub RC(x As Single,y As Single) i=x x=i/y y=i Mod y End Sub
A.4 3
B.1 1
C.3 0
D.2 6
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!