单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim x As Integer
x = 1
Do Until x ＞ 8
Print x；
x = x + 3.4
Loop
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是

A．1 4.4 6.8
B．1 3 5
C．1 4 7
D．无数据输出
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() m=1:n=0 Call sub) ((m)，n) m=m+2 n=n+m Print m; n End Sub Private Sub Subl(x， y) x=x+2 y=y+x End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．5 6
B．3 6
C．0 1
D．2 3
单项选择题
编写如下事件过程： Private Sub Form Click() Dim Char As String，i As Integer Const ch$= # msg$= Enter a String： char=InputBox$(msg$) n=Len(Char) For i=1 To n If Mid$(char，i，1)=ch$ Then Exit For End If Next i Print i - 1 End Sub 其中InputBox函数的功能是弹出一个输入对话框，按所给参数给出提示，等待用户输入，并返回输入的内容。程序运行后，单击窗体，如果在输入对话框内输入字符串“12ab$%* #fg”，则窗体上输出
A．2
B．2
C．5
D．8
相关试题