题目内容
（请给出正确答案）
在窗体上画一个命令按钮，然后编写下列程序：
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
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“在窗体上画一个命令按钮，然后编写下列程序：PrivateSubCommand12_Click（） Tt3 EndSub SubT”相关的问题
在窗体上画一个名为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
在窗体上画一个命令按钮，名称为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
在窗体上画一个命令按钮，然后编写下列程序 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
在窗体上画一个命令按钮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
在窗体上画一个命令按钮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
在窗体上画一个命令按钮，然后编写下列程序： 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
在窗体上画一个命令按钮，然后编写下列程序 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
在窗体上画一个命令按钮，其名称为Command1，然后编写下列代码：
Option Base l
Private Sub Command1 Click（）
Dim a
a=Array(1，2，3，4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print S
End Sub
程序运行后，单击命令按钮，其输出结果是（）。
A.4321
B.1234
C.34
D.12
在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写下列程序：
Private Sub Command1 click()
A=InputBox("请输入日期(1～31)")
t="旅游景点："_
&Ⅱf(A＞0 And A＜=10,"长城","")_
&Ⅱf(A＞10 And A＜=20,"故宫","")_
&Ⅱf(A＞20 And A＜=30,"颐和园","")
Text1.Text=t
End Sub
程序运行后，如果从键盘输入5，则在文本框中显示的内容是()。
A．旅游景点：长城
B．旅游景点：长城颐和园
C．旅游景点：颐和园
D．旅游景点：故宫
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
