(2 ) 计算机的主机构成是
A )运算器、控制器、内存
B )运算器、中央处理器、内存
C )控制器、 CPU 、内存
D ) CPU 、运算器、内存
第1题
设有如下程序:
Private Sub Form. Click()
Dim s As Long,f As Long
Dim n As Integer,i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是()。
A.32
B.33
C.34
D.35
第2题
设有如下程序: Private Sub Form. Click() Dim ary(1 To 5)As Integer Dim i As Integer Dim sum As Integer For i=1 To 5 ary(i)=i+l sum=sum+ary(i) Next i Print sum End Sub 程序运行后,单击窗体,则在窗体上显示的是()。
A.15
B.16
C.20
D.25
第3题
设有如下程序:
Private Sub Form. Click()
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+l
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后,单击窗体,则在窗体上显示的是()。
A.15
B.16
C.20
D.25
第4题
设有如下程序:
Private Sub Form. Click()
Dim i As Integer,x As String,y As String
x="ABCDEFG"
For i=4 To 1Step-1
y=Mid(X,i,i)+y
Next i
Print y
End Sub
程序运行后,单击窗体,输出结果为()。
A.ABCCDEDEFG
B.AABBCDEFG
C.ABCDEFG
D.AABBCCDDEEFFGG
第5题
A.32
B.33
C.34
D.35
第6题
有如下事件过程:
Private Sub Form. Active ()
Dim Score (1 to 3) As Integer
Dim i As Integer
Dim t As Variant
Fori=3 To 1 step-1
Score (i) = 2 * i
Next
For Each t In Score
Print t
Next
End Sub
程序运行后窗体上显示的值为【 】。
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!