假定有如下的Sub过程:    Sub s fun(x As Single, y As Single)      t=x      x=t/y      y= t Mod y    End Sub    在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:    Private Sub Command1_Click(  )      Dim a as single      Dim b as single      a=5      b=4    sfun a,b  MsgBox a & chr(10)+chr(13) & b    End Sub打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为(      )。

试卷相关题目

• 1以下程序段运行后,消息框的输出结果是（    ）a=sqr(3)b=sqr(2)c=a>bMsgbox c+2

  A.-1

  B.1

  C.2

  D.出错

  开始考试点击查看答案
• 2VBA的逻辑值进行算术运算时,True值被当作（    ）。

  A.0

  B.-1

  C.1

  D.任意值

  开始考试点击查看答案
• 3表达式Val("76af89")的返回值为（    ）。

  A.76af89

  B.76

  C.7689

  D.7

  开始考试点击查看答案
• 4定义了二维数组A(2to5,5),则该数组的元素个数为（    ）。

  A.25

  B.36

  C.20

  D.24

  开始考试点击查看答案
• 5循环结构      For K=2 To 12 Step 2          K=2*K      Next  K      循环次数为（    ）。

  A.1

  B.2

  C.3

  D.4

  开始考试点击查看答案
• 6在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码  Private Sub Command1_Click( )    a=0:b=5:c=6    MsgBox a=b+c  End Sub窗体打开运行后,如果单击命令按钮,则消息框的输出结果为(   )

  A.11

  B.a=11

  C.0D.False

  开始考试点击查看答案
• 7在窗体中添加一个名称为Command1 的命令按钮,然后编写如下事件代码:Private Sub Command1_Click( ) Dim a(10,10)  For m=2 To 4    For n=4 To 5      a(m,n)=m*n    Next n  Next m  MsgBox a(2,5)+a(3,4)+a(4,5) End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果（    ）。

  A.22

  B.32

  C.42

  D.52

  开始考试点击查看答案
• 8在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下程序:Public x As IntegerPrivate Sub Command1_Click( )  x=10  Call s1  Call s2  MsgBox xEnd SubPrivate Sub s1( )  x=x+20End subPrivate Sub s2( )  Dim x As Integer  x=x+20End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为（   ）。

  A.10

  B.30

  C.40

  D.50

  开始考试点击查看答案
• 9以下不是报表组成部分的是（    ）

  A.报表设计器

  B.主体

  C.报表页脚

  D.报表页眉

  开始考试点击查看答案
• 10要在报表的最后一页底部输出的信息,应通过（    ）设置。

  A.组页脚

  B.报表页脚

  C.报表页眉

  D.页面页脚

  开始考试点击查看答案