赞题库-背景图
单项选择题

单击命令按钮时，下列程序的执行结果是
Private Sub Command1_Click()
BT 4
End Sub
Private Sub BT(x As Integer)
x=x*2+1
If x＜6 Then
Call BT(x)
End If
x=x*2
Print x；
End Sub
Ａ) 15 Ｂ) 16
Ｃ) 17 Ｄ) 18
<上一题 目录 下一题>
热门试题

单项选择题下面有一段程序代码，如果从键盘上输入 Computer ，则在文本框内显示的内容是 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＞=65 And KeyAscii＜=122 Then KeyAscii=42 End If End Sub Ａ) Computer Ｂ) 什么都没有 Ｃ) ******** Ｄ) 程序出错

下面有一段程序代码，如果从键盘上输入"Computer"，则在文本框内显示的内容是
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii＞=65 And KeyAscii＜=122 Then
KeyAscii=42
End If
End Sub
Ａ) Computer Ｂ) 什么都没有
Ｃ) ******** Ｄ) 程序出错

单项选择题在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_C1ick() Dim a(5，5) For i=1 To 3 For j=1 To 4 a(i，j) =i*j Next Next For n=1 To 2 For m=1 To 3 Print a(m,n)； Next Next End Sub 程序运行后，单击命令按钮，输出结果是 Ａ) 2 4 6 1 2 3 Ｂ) 1 2 3 2 4 6 Ｃ) 1 2 3 4 5 6 Ｄ) 6 5 4 3 2 1

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_C1ick()
Dim a(5，5)
For i=1 To 3
For j=1 To 4
a(i，j) =i*j
Next
Next
For n=1 To 2
For m=1 To 3
Print a(m,n)；
Next
Next
End Sub
程序运行后，单击命令按钮，输出结果是
Ａ) 2 4 6 1 2 3 Ｂ) 1 2 3 2 4 6
Ｃ) 1 2 3 4 5 6 Ｄ) 6 5 4 3 2 1