设有如下通用过程： Public Sub Fun(a(), ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text = n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是( ) A）10B）15C）25D）24
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2, 4, 6 x = 20 Case Is < 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是( ) A）10B）20C）30D）40
窗体的MouseDown事件过程 Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) 有4个参数，关于这些参数，正确的描述是( ) A）通过Button参数判定当前按下的是哪一个鼠标键 B）Shift参数只能用来确定是否按下Shift键 C）Shift参数只能用来确定是否按下Alt和Ctrl键 D）参数x,y用来设置鼠标当前位置的坐标
