在窗体上画一个命令按钮，然后编写如下程序：

 Function fun(By Val num As Long)As Long

   Dim k As Long

   k=1

   num=Abs(num)

   Do While num

     k=k*(num\10)

     num=num\10

   Loop

   fun=k

 End Function

 Private Sub Command1_Click()

    Dim n As Long

    Dim r As Long

    n=InputBox("请输入一个数")

    n=CLng(n)

    r=fun(n)

    MsgBox r

 End Sub

 程序运行后，单击命令按钮，在输入对话框中输入234，消息框显示的结果为【 】。

在窗体上画一个命令按钮，然后编写如下程序：

 Function fun(By Val num As Long)As Long

   Dim k As Long

   k=1

   num=Abs(num)

   Do While num

     k=k*(num\10)

     num=num\10

   Loop

   fun=k

 End Function

 Private Sub Command1_Click()

    Dim n As Long

    Dim r As Long

    n=InputBox("请输入一个数")

    n=CLng(n)

    r=fun(n)

    MsgBox r

 End Sub

 程序运行后，单击命令按钮，在输入对话框中输入234，消息框显示的结果为【 】。

运行如下程序段：

    x=1

    y=1

    z=1

    For j=1 To 3

       Fork=1 To 3

         If j=1 Then

      x=x+y+z

    ElseIf j=2 Then

      x=2*x+2*y+2*Z

    Else

      x=3*x+3*y+3*Z

    End If

   Next k

  Next j

 x的值应是【 】

在窗体上画一个命令按钮，然后编写如下代码：

 Private Sub Command1_C1ick()

   Dim M (10) As Integer

   For k=1 To 10

      M(k)=12-k

   Next k

   x=6

   Msgbox M(2+M(x))

 End Sub

 程序运行后，单击命令按钮，消息框显示的是【 】。

如果要引用宏组中的宏名，采用的语法是【 】。

Access的窗体或报表事件可以有两种方法来响应：宏对象和【 】。

窗体由多个部分组成，每个部分称为一个【 】。

Access中，“自动创建报表”向导分为：纵栏式和【 】两种。

Access数据库包括表、查询、窗体、报表、【 】、宏和模块等基本对象。

Access数据库的扩展名是【 】。

在关系数据库模型中，二维表的列称为属性，二维表的行称为【 】。