vb题库

使用时间: 1分50秒 章节作业

1、 通用过程可以通过执行“工具”菜单中的（）命令来建立。 A) 添加过程 B) 通用过程 C) 添加窗体 D) 添加模块 正确答案是: A 你选择的答案是：A √ 2、 执行“工程”菜单中的（）命令可以添加一个标准模块。 A) 添加过程 B) 通用过程 C) 添加窗体 D) 添加模块 正确答案是: D 你选择的答案是：B × 3、 下列程序代码在单击三次命令按钮时的输出结果为（）。 sub mysub() for i=1 to 10 step 2 s=s+1 next i print s; end sub private sub command1_click() call mysub end sub A) 5 10 15 B) 25 50 75 C) 5 5 5 D) 5 20 30 正确答案是: C 你选择的答案是：B × 4、 下列程序代码在单击三次命令按钮时的输出结果为（）。 dim x,y,z sub ss() x=x+1 y=y+1 z=z+1 print x;y;z end sub private sub command1_click() dim x,y,z x=1:y=2:z=3 call ss()

print x;y;z end sub A) 3 3 3 B) 2 3 4 C) 1 2 3 D) 2 3 5 1 2 3 2 3 4 1 2 3 1 2 3 正确答案是: A 你选择的答案是：A √ 5、 以下叙述中正确的是（ ）。 A）一个Sub过程至少要有一个Exit Sub语句 B）一个Sub过程必须有一个End Sub语句 C）可以在Sub过程中定义一个Function过程，但不能定义Sub过程 D）调用一个Function过程可以获得多个返回值 正确答案是: B 你选择的答案是：B √ 6、 有如下函数过程： Function f1(x As Integer) As Long Dim s As Long Dim i As Integer s = 0 For i = 1 To x s = s + i Next i f1 = s End Function 在窗体上添加一个命令按钮，名为Command1，并编写事件过程调用该函数，则输出结果为（ ）。 Private Sub Command1_Click() Dim i As Integer Dim sum As Long For i = 1 To 5 sum = sum + f1(i) Next i Print sum End Sub A）25 B）35 C）45 D）55 正确答案是: B 你选择的答案是：B √ 7、 运行下面的程序，单击命令按钮，输出结果为（ ）。 Function F(a As Integer) b = 0

Static c b = b + l c = c + 1 F = a + b + c End Function Private Sub Command1_Click() Dim a As Integer a = 2 For i = 1 To 3 Print F(a) Next i End Sub A）3 3 3 B）3 4 5 C）3 5 7 D）3 6 9 正确答案是: B 你选择的答案是：A × 8、 单击命令按钮时，下列程序段的执行结果为（ ）。 Private Sub Command1_Click() Print Func1(24,18) End Sub Public Function Func1(m As Integer,n As Integer)As Integer Do While m<>n Do While m>n:m=m-n:Loop Do While m

9、 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序: Dim SW As Boolean Function func(X As Integer) As Integer If X < 20 Then Y = X Else Y = 20 + X End If func = Y End Function Private Sub Command1_Click() Dim intNum As Integer intNum = InputBox(\ If SW Then Print func(intNum) End If End Sub Private Sub Form_MouseDown(Button As Integer, Shift As _ Integer, X As Single, Y As Single) SW = False End Sub Private Sub Form_MouseUp(Button As Integer, Shift As _ Integer, X As Single, Y As Single) SW = True End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果是（ ）。 A）输出0 B）输出25 C）输出45 D）无任何输出 正确答案是: D 你选择的答案是：B × 10、 在过程定义中，Private表示（ ）。 A）此过程可以被其他过程调用 B）此过程不可以被任何其他过程调用 C）此过程只可以被本工程中的其他过程调用 D）此过程只可以被本窗体模块中的其他过程调用 正确答案是: D 你选择的答案是：B ×

本次成绩50分

使用时间: 2分0秒

章节作业

1、 通用过程可以通过执行“工具”菜单中的（）命令来建立。 A) 添加过程 B) 通用过程 C) 添加窗体 D) 添加模块 正确答案是: A 你选择的答案是：A √ 2、 使用Public const语句声明一个全局的符号常量时，该语句应放在（）。 A) 窗体模块的通用声明段 B) 窗体模块或标准模块的通用声明段 C) 标准模块的通用声明段 D) 过程中 正确答案是: C 你选择的答案是：A × 3、 单击命令按钮执行以下程序，输出结果为（ ）。 Private Sub Command1_Click() Dim x As Integer, y As Integer x = 12: y = 32 Call Proc(x, y) Print x; y End Sub Public Sub Proc(n As Integer, ByVal m As Integer) n = n Mod 10 m = m Mod 10 End Sub A）12 32 B）2 32 C）2 3 D）12 3 正确答案是: B 你选择的答案是：A × 4、 单击一次命令按钮，下列程序代码的执行结果为（ ）。 Private Sub Command1_Click()