未知题型
在窗体上画一个名称为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.1 3 5
C.1 4 7
D.无数据输出
- A.4
B.13.45.8
B.1
C.1
【参考答案】
B
解析:Do Until…Loop循环采用的是先判断循环条件后执行循环体的做法。而用Until关键字表示当循环......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
未知题型
在窗体上画一今名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a<=0 Print s;a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ______。D.死循环
A.79
B.340
C.97 -
问答题
こんな重要な仕事は私にできる( )( )( )( )、初めは不安でした。 -
未知题型
设有如下程序: Private Sub Command1_Click() Dim sum As Double,x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过For循环计算一个表达式的值,这个表达式是 ______。D.1+1/2+1/3+1/4+1/5
A.1+1/2+2/3/4+4/5
B.1+1/2+2/3+3/4
C.1/2+2/3+3/4+4/5
