已知在4行3列的一个全局数组score(4,3)中已经存放了4个学生3门课程的考试成绩(均为整数,数据的输入过程省略).现需要计算每个学生的总分,某人编写程序如下:Option Base 1Private Sub Command1_Click()Dim sum As IntegerFor i=1 To 4Sum=________For j=1 To 3Sum = sum + score(i,j)Next jPrint"第"&i&"个学生的总分是:";sumNext iEnd Sub要使程序正确运行,在横线__处应该填写的内容是.
A. 0
B. 1
C. score(i,1)
D. score(1,i)
查看答案
有以下的语句:Option Base 1Dim xscj(3,4,5) As String声明的数组xscj有个数组元素.
A. 120
B. 20
C. 12
D. 60
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()Dim city As Variantcity = Array("北京", "上海", "天津", "重庆")Print city(1)End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A. 空白
B. 错误提示
C. 北京
D. 上海
在窗体上画一个命令按钮,名称为Command1的命令按钮,然后编写如下程序:Private Sub Command1_Click()Dim a(4) As Integer, b(4) As IntegerFor k = 0 To 2a(k + 1) = InputBox("请输入一个整数")b(3 - k) = a(k + 1)Next kPrint b(k)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输出结果为
A. 0
B. 2
C. 3
D. 4
在窗体上添加一个命令按钮,编写如下代码:Option Base 1Private Sub Command1_ClickDim a(10) As Integer,p(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub程序运行后,单击命令按钮,输出结果是
A. 35
B. 28
C. 33
D. 37