单项选择题
假定有如下事件过程:
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个数进行快速排序算法的平均时...
软件工程的目的是成功地开发大型软件系统,...