单选题：设有如下通用过程：Public Sub Fun(a0，ByVal x As Integer)For i=l T0 5x=

  • 题目分类：VB
  • 题目类型：单选题
  • 查看权限：VIP
题目内容：
设有如下通用过程：
Public Sub Fun(a0，ByVal x As Integer)
For i=l T0 5
x=X+a(i)
Next
End Sub
在窗体上画一个名称为Textl的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程：
Private Sub Command l_Click()
Dim arr(5) As Variant
For i=1 T0 5
arr(i)=i
Next
n=lO
Call Fun(arr()，n)
Textl．TeXt=n
End Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是 （　　） A．10
B．15
C．25
D．24
参考答案：
答案解析：

在窗体上画一个名称为F1lel的文件列表框，并编写如下程序：Private Sub F1le 1_DblClick0x=

在窗体上画一个名称为F1lel的文件列表框，并编写如下程序：Private Sub F1le 1_DblClick0x=Shell(F1le1．F1leName

分类：VB  题型：单选题
查看答案

设有如下通用过程：Public Sub Fun(a()As Integer，x As Integer)Fori=1 T0

设有如下通用过程：Public Sub Fun(a()As Integer，x As Integer)Fori=1 T0 5x=X+a(i)NextEnd Su

分类：VB  题型：单选题
查看答案

设有如下程序Private Sub search(a0As Variant，ByVal key As Variant，i

设有如下程序Private Sub search(a0As Variant，ByVal key As Variant，index%)Diml%For I=LBo

分类：VB  题型：单选题
查看答案

设有如下程序Private Sub Form Click()Dim a As Integer,b As Integera

设有如下程序Private Sub Form Click()Dim a As Integer,b As Integera=20：b=50P1 a.bp2 a.b

分类：VB  题型：单选题
查看答案

在窗体上画1个名称为Command1的命令按钮，并编写以下程序Private Sub Command1_Click()P

在窗体上画1个名称为Command1的命令按钮，并编写以下程序Private Sub Command1_Click()Print fun(“ABCDEFG”)E

分类：VB  题型：单选题
查看答案