单项选择题

在窗体上画一个名称为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
程序运行后,单击命令按钮,则窗体上显示的内容是

A.7 9
B.34 0
C.9
D.死循环
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上绘制一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim c As Integer,d As Integer d=0 c=6 x=Array(2,4,6,8,10,12) For i=1 To 6 If x(i)>c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为
A.10
B.16
C.12
D.20
单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写 如下事件过程: Private Sub Command1_Click() Dim arrayl(10,10)As Integer Dim i, j As Integer For i=1 To 3 For j=2 To 4 arrayl(i,j)=i + j Next j Next i Text1.Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是
A.12
B.13
C.14
D.15
相关试题
  • 下列可作为Visual Basic变量名的是
  • 在结构化方法中,用数据流程图(DFD) 作...
  • 软件需求分析阶段的工作可以分为四个方面:...
  • 设菜单中有一个菜单项为“Open”。若要为该...
  • 假定有以下程序段: For i= 1 To 4...