单项选择题

在窗体上画—个名称为Command1的命令按钮,然后编写如下代码:
Option Base 1
Private Sub Command1_Click()
d=0
c=10
x=Array(10,12,21,32,24)
For i=1 To 5
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.89
B.99
C.23
D.77
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画—个名称为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.147
D.无数据输出
单项选择题
在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub Form Load() Show Text1.Text= Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,x As Single,Y As Single) Print 程序设计 End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Visual Basic ; End Sub 程序运行后,如果按A键,然后单击窗体,则在窗体上显示的内容_________。
A.Visual Basic
B.程序设计
C.A程序设计
D.Visual Basic程序设计
相关试题
  • 在窗体上画一个名称为Command1的命令按钮...
  • 设有如下程序: Private Sub Command1...
  • 在窗体上画两个滚动条,名称分别为Hscroll...
  • 在窗体上画—个名称为Command1的命令按钮...