单项选择题

阅读程序：
Private Sub Form Click( )
Dim num As Integer, digit As Integer
num=InputBox("输入数据")
Do While num＜＞0
digit=num Mod 10
num=num\10
Print digit；
Loop
End Sub
程序运行后，如果从键盘上输入12345，则输出结果为______。

A．1 3 7 5 9
B．5 4 3 2 1
C．2 4 6 8 10
D．1 2 3 4 5
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) x=5:y=2 Call sub1((x)，y) Print x; y End Sub Private Sub sub1(m，n) t=m:m=n:n=t End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。
A．2 5
B．5 4
C．1 4
D．5 5
单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim i AsInteger, n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
A．2
B．3
C．4
D．5
相关试题