单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
option Base 1
Private Sub Command1_Click()
Dim s As Variant
a=Array(1, 2, 3, 4, 5)
Sum=0
For i=1 To 5
Sum=Sum_a(i)
Next i
X=Sum/5
For i=1 To 5
If a(i)>x Then Print a(i);
Next i
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是______。
A.1 2
B.1 2 3
C.3 4 5
D.4 5
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c= ABCD For n=1 To 4 Print ______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容; D CD BCD ABCD 则在填空处应填入的内容为______。
A.Lelt(c, n)
B.Right(c, n)
C.Mid(c, n, 1)
D.Mid(c, n, n)
点击查看答案&解析
单项选择题
在窗体上画一个名称为C0mnmndl的命令按钮和3个名称分别为Label1、Label2、Label3的标签,然后编写如下代码: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n=10 : z=n+z y=y+z : x=x+z Label1 Caption=x Label2 Caption=y Label3 Caption=z End Sub 运行程序,连续3次单击命令按钮后,则3个标签中显示的内容分别是______。
A.10 10 10
B.30 30 30
C.30 30 10
D.10 30 30
点击查看答案&解析
相关试题
设有如下程序: Option Base 0 Privat...