单项选择题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
For i=1 To 4
If i=1 Then x=i
If i <= 4 Then x=x+1
Print x;
Next i
End Sub
程序运行后,单击命令按钮,其输出的结果为
A.1 2 3 4
B.2 3 4 5
C.2 3 4 4
D.3 4 5 6
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer Dim sum As Integer Dim sum1 As Integer Dim a(1 To 20),x For i = 1 To 10 a(i)=i Next i For Each x In a If x Mod 2 = 0 Then sum1=sum1+x Else sum = sum+x End If Next x Print sum;sum1 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是
A.25 30
B.10 20
C.20 30
D.1 10
点击查看答案&解析
单项选择题
阅读下列程序: Function func(n As Integer)As Integer Sum = 0 For i = 1 To n Sum = Sum + (i + 1)* i Next i func = Sum End Function. Private Sub Command1_Click () Dim a As Integer a= 5 s = func (
A.
Print s
End Sub
程序运行后,单击命令按钮,输出的结果为A) 80
B.60
C.70
D.15
点击查看答案&解析
相关试题
启动窗体在“工程属性”对话框中指定,为了...
在Visual Basic中,用于管理文件系统的3...
为了能自动放大或缩小图像框中的图形以与图...
有下列程序: Private Sub Command1_C...
能判断是否到达文件尾的函数是 【12】 。