填空题阅读下列程序。 Option Base 1 Private Sub Form Click() Dim x(3,3) For j=l to 3 For k=l to 3 If j=k then x(j,k)=l If j＜＞k then x(j,k)=k Next k Next j Call fun(x()) End Sub Private Sub fun(x() ) For j=1 to 3 For k=1 to 3 Print x(j,k); Next k Next j End Sub 运行程序时，输出结果为 【14】
填空题下面VBA程序段运行时，内层循环的循环总次数是{{U}} 【12】 {{/U}}。
For m = 0 To 7 step 3
For n = m-1 To m+1
Next n
Next m
填空题在报表中要显示格式为“第N页”的页码，页码格式设置是：="第"& 【7】 &"页"。
填空题在窗体中有一个名为Command1的命令按钮，Click事件的代码如下：
Private Sub Command1_Click()
f=0
For n = 1 To 10 Step 2
f = f+n
Next n
Me!Lb1.Caption = f
End Sub
单击命令按钮后，标签显示的结果是【 】。
填空题【 】是窗体上用于显示数据、执行操作、装饰窗体的对象。
填空题操作查询是指仅在一个操作中更改多条 【10】 的查询。
填空题每个查询都有3种视图，一是______，二是______，三是______。
填空题Access中用于执行指定的SQL语言的宏操作名是______。
填空题实际上，所有宏操作都可以转换为相应的模块代码，它可以通过______来完成。
填空题三维数组Array(3，3，3)的元素个数为{{U}} 【15】 {{/U}}。
填空题常用的结构数据模型有关系型、{{U}} 【6】 {{/U}}和{{U}} 【7】 {{/U}}。
填空题对窗体test上文本框控件txtAge中输入的学生年龄数据进行验证。要求：该文本框中只接受大于等于15且小于等于30的数值数据，若输入超出范围则给出提示信息。该文本控件的BeforeUpdate事件过程代码如下，请在空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub txtAge_BeforeUpdate(Cancel As Integer) If Me!txtAge=" "or______(Me! txtAge)Then 数据为空时的验证 MsgBox"年龄不能为空!"，vbCritical，"警告" Cancel=True 取消BeforeUpdate事件 ElseIf IsNumeric(Me! txtAge)=False Then 非数值数据输入的验证 MsgBox"年龄必须输入数值数据!"，vbCritical，"警告" Cancel=True 取消BeforeUpdate事件 ElseIf Me!txtAge＜15 Or Me!txtAge______Then 非法范围数据输入的验证 MsgBox”年龄为15～30范围数据!"，vbCritical，"警告" Cancel=True 取消BeforeUpdate事件 Else 数据验证通过 MsgBox"数据验证OK!"，vblnformation，"通告" End If Fnd Sub
填空题在设置数据访问页的自定义背景之前，必须______。
填空题在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a+1 End If a=a+1 Next j Next i MsgBox a End Sub 程序执行后，单击命令按钮，消息框显示的是______。
填空题设有以下窗体单击事件过程： Private Sub Form_C1ick( ) a=1 For i=1 To 3 Select Case i Case 1,3 a=a+1 Case 2,4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出内容是______。
填空题选择字段的方法有3种，一是单击 ______ ；二是双击 ______ ；三是单击“设计网格”中字段行上要放置字段的列。
填空题下图所示的流程控制结构称为{{U}}【8】{{/U}}。
填空题在数据访问页的工具箱中，图标? 的名称是{{U}} 【13】 {{/U}} 。
填空题某个窗体己编写以下事件过程。打开窗体运行后，单击窗体，消息框的输出结果为 【11】 。 Private Sub Form_Click() Dim k as Integer，n as Integer，m as Integer n=10 : m=1 : k=1 Do While k＜=n m=m*2 k=k+1 Loop MsgBox m End Sub
填空题运行以下程序段后，输出结果为【7】。 For I=1 To 3 Cis Print"I=",I; Next