单项选择题
在窗体上画一个名称为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 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.79
B.340
C.97
D.死循环
点击查看答案&解析
单项选择题
以下能判断是否到达文件尾的函数是 ______。
A.BOF
B.LOC
C.LOF
D.EOF
点击查看答案&解析
相关试题
在窗体上画—个命令按钮,其名称为Command...
在窗体上画两个文本框,其名称分别为Text1...
以下Prime过程,用于判断一个数是否为素数...
控件数组的名字由 【9】 属性指定,而数...
当用 【12】 方式打开文件时,如果对文...