单项选择题
窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Optlon Base 1
Prlvete 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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程; Private Sub Command1_Click() n=Text1. Text Select Case n Case 1 To 20 x=10 Case 2, 4, 6 x=20 Case Is<10 x=30 Case 10 x=40 End Select Text2. Text=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是______。
A.10
B.20
C.30
D.40
点击查看答案&解析
单项选择题
设有如下程序: Private Sub Command1_Click() Dim sum As Double, k As Double sum=0 n=0 For i=1 To 5 k=n i n=n+1 sum=sum+k Next End Sub 该程序通过For循环计算一个表达式的值,这个表达式是______。
A.1+1/2+2/3+3/4+4/5
B.1+1/2+2/3+3/4
C.1/2+2/3+3/4+4/5
D.1+1/2+1/3+1/4+1/5
点击查看答案&解析
相关试题
在窗体上画一个名称为Command1的命令按钮...
在窗体上画一个名称为Command1的命令按钮...
在窗体上画一个名称为Command1的命令按钮...