在窗体中有一个命令按钮Command1，对应的事件代码如下：  Private Sub Command1_Enter()   Dim num As Integer   Dim a As Integer   Dim b As Integer   Dim i As Integer   For i=1 To 10    num=InputBox("请输入数据：","输入",1)    If Int(num/2)=num/2 Then     a=a+1    Else     b=b+1    End If   Next i   MsgBox("运行结果：a="&Str(a)&：",b="&Str(b))  End Sub  运行以上事件所完成的功能是(  )。

在窗体中添加一个名称为Com1的命令按钮，然后编写如下程序：

 Private Sub s(ByVal p As Integer)

  p=p*2

 End Sub

 Private Sub Com1_Click()

 Dim i As Integer

  i=3

  Call s(i)

  If i＞4 Then i=i^2

 End sub

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

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，然后编写如下事件过程：

 Private Sub Command1_Click()

  Dim x As Integer,y As Integer,z As Integer

  Call p1(a,b,c)

 End Sub

 Sub p1(x As Integer,y As Integer,z As Integer)

  z=x+y

 End Sub

 打开窗体运行后，单击命令按钮，文本框中显示的内容是(   )。

执行以下程序段后，变量c的值为(   )。

 c=b & UCase(Mid(a,7,6)& Right(a,12))

在窗体上画一个名称为Com1的命令按钮，然后编写如下事件过程：

 Private Sub Com1_Click()

  n=10

  q=1

  sum=0

  For i=1 To n

 Next

 Print sum

 End Sub

该事件过程的功能是计算s=1+1/2!+1/3!+…+1/n!的值。请填空。

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

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

 Private Sub Command1_Click()

 Dim i As Integer,n As Integer

 n=0

 For i=1 To 50

  i=i+3

  n=n+1

  If i＞10 Then Exit For

 Next i

 Text1.Text=Str(n)

 End Sub

设有命令按钮Command1的单击事件过程，代码如下：

 Private Sub Command1_Click()

 Dim a(3,3)As Integer

 For i=1 To 3

  For j=1 To 3

  Next j

 Next i

 Sum=0

 For i=1 To 3

 Next i

 MsgBox Sum

 End Sub

 运行程序，单击命令按钮，消息框输出结果是(   )。

在窗体上画1个命令按钮(名称为Command1)和1个文本框(名称为Text1)，然后编写如下事件过程：

 Private Sub Command1_Click()

 Select Case x

  Case 1, 3

  Case Is＞=10，Is＜=-10

   y=x

  Case-10 To 10

   y=-x

 End Select

 End Sub

程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为(   )。

在使用Dim语句定义数组时，在缺省情况下数组下标的下限为(   )。

在E-R图中，矩形表示(   )。