单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Commandl_click()
Dim a As Integer,s As Integer
a=8
s=1
Do
s=sta
a=a-1
Loop While a＜=0
Print s=a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是______。

A．79
B．340
C．97
D．死循环
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Textl.Text= Textl.Set Focus End Sub Private Sub Form_MouseUp(Button As Inateger,Shift As Integer,X As Single,Y As Single) Frint 程序设计 End Sub Private Sub Textl_KeyDown(KeyCode As InteSer,Shin As Integer) Print VisualBasic ； End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是______。
A．Visual Bask
B．程序设计
C．A程序设计
D．ViualBasic程序设计
单项选择题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下代码： OpdOn Base1 Private Sub Commandl_CUck() d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 Ifx(i)＞c Then d=d+x(i) c=X(i) Else d=d-c End If Next I Printd End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。
A．89
B．99
C．23
D．77
相关试题