单项选择题

假定有如下事件过程:
Private Sub Form Click()
Dim x As Integer, n As Integer
x=1
n=0
Do While x<28
x=x*3
n=n+1
Loop
Print x, n
End Sub
程序运行后,单击窗体,输出结果是______。

A.81 4
B.56 3
C.28 1
D.243 5
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: 1 12 123 1234 则在下划线处应填入的内容为______。
A.Rght(c1,i)
B.Left(c1,i)
C.Mid(c1, i, 1)
D.Mid(c1, i,
单项选择题
有如下程序: Private Sub Form_Click() Dim Check, Counter Check=True Counter=0 Do Do While Counter<20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter, Check End Sub 程序运行后,单击窗体,输出结果为______。
A.15 0
B.20 -1
C.10 True
D.10 False
相关试题
  • 以下是一个比赛评分程序。在窗体上建立一个...
  • 设有如下记录类型: Type student Numbe...
  • 在窗体上画一个命令按钮和一个文本框。然后...
  • 对于输人的N个数进行快速排序算法的平均时...
  • 软件工程的目的是成功地开发大型软件系统,...