2006年4月全国计算机等级考试二级Access数据库程序设计

          Dim i As Integer

          i=3

          Call s(i)

          If i>4 Then i=i^2

          MsgBox i

        End Sub

 窗体打开运行后，单击命令按钮，则消息框的输出结果为     【12】     。

（13）设有如下代码：

        x=1

        do

           x=x+2

        loop  until     【13】     

 运行程序，要求循环体执行3次后结束循环，在空白处填入适当语句。

（14）窗体中有两个命令按钮：“显示”（控件名为cmdDisplay）和“测试”（控件名为cmdTest）。以下事件过程的功能是：单击“测试”按钮时，窗体上弹出一个消息框。如果单击消息框的“确定”按钮，隐藏窗体上的“显示”命令按钮；单击“取消”按钮关闭窗体。按照功能要求，将程序补充完整。

 　 Private Sub cmdTest_Click()

        Answer=     【14】     （“隐藏按钮”，vbOKCancel）

        If Answer=vbOK Then

          cmdDisplay.Visible=     【15】    

        Else

          Docmd.Close

        End If

           End Sub