单项选择题
窗体上命令按钮Command1的事件过程如下:
Option Base 1
Private Sub Command1_Click()
Dim a(4,4)As Variant
For i=1 To 4
For j=1 To 4
a(i,j)=(i-1)*3+j
Next j
Next i
For i=3 To 4
For j=3 To 4
Print a(i,j)
Next j
Next i
End Sub
该程序执行后,输出结果是( )。
A.9
10
12
13
B.7
10
12
13
C.9
12
10
13
D.8
11
9
12
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n)的一维数组中,请填写空白处,完成该程序。 Option Base 1 Private Sub Command1_Click() Dim a(1 To 4,1 To 5):Dim b() ReDim______ For i=1 To 4 For j=1 To 5 a(i,j)=i*j Next j Next i Call Transf(a,4,5,B) End Sub Sub Transf(a(),m,n,b()) Dim x As Integer x=1 For i=1 To m For j=1 To n b(x)=______ x=x+1 Next j Next i End Sub
点击查看答案&解析
填空题
在关系模型中,若属性A是关系R的主码,属性A的取值不能为空,称为______ 约束。
点击查看答案&解析
相关试题
在窗体上画一个驱动器列表框、一个目录列表...
在窗体上有一个名称为Label1的标签和一个...
引用列表框(List1)最后一个列表项应使用...