假定有如下的Sub过程：Sub sfun（x  As  Single，y  As    Single）t=xx=t/yy=t Mod yEnd Sub在窗体上添加一个命令按钮（名为Command1），然后编写如下事件过程：Private Sub Command1_Click()Dim a as singleDim b as singlea=5b=4sfun a，bMsgBox a & chr（10）+chr（13）& bEnd Sub打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为

试卷相关题目

• 1在窗体上添加一个命令按钮（名为Command1），然后编写如下事件过程：Private Sub Command1_Click()For i=1 To 4x=4For j=1 To 3x=3For k=1 To2x=x+6Next kNext jNext iMsgBox xEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是

  A.7

  B.15

  C.157

  D.538

  开始考试点击查看答案
• 2以下程序段运行结束后，变量x的值为x=2y=4Dox=x*yy=y+1Loop  While  y<4

  A.2

  B.4

  C.8

  D.20

  开始考试点击查看答案
• 3Access的控件对象可以设置某个属性来控制对象是否可用（不可用时显示为灰色状态）。需要设置的属性是

  A.Default

  B.Cancel

  C.Enabled

  D.Visible

  开始考试点击查看答案
• 4现有一个已经建好的窗体，窗体中有一命令按钮，单击此按钮，将打开“tEmployee”表，如果采用VBA代码完成，下面语句正确的是

  A.docmd.openform″tEmployee″

  B.docmd.openview″tEmployee″

  C.docm

  D.opentable″tEmployee″D.docmd.openreport″tEmployee″

  开始考试点击查看答案
• 5VBA表达式3*33/3的输出结果是

  A.0

  B.1

  C.3

  D.9

  开始考试点击查看答案