单项选择题

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

A．13. 45. 8
B．135
C．1 4 7
D．无数据输出
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Command1_Click() n=Val(Text1. Text) For i=2 To n For j=2 To Sqr(i) If i Hod j=0 Then Exit For Next j If j＞Sqr(i)Then Print i Next i End Sub 该事件过程的功能是______。
A．输出n以内的奇数
B．输出n以内的偶数
C．输出n以内的素数
D．输出n以内能被j整除的数
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程； Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_C1ick() Dim i As Integer, s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是______。
A．6
B．7
C．8
D．9
相关试题