二级VB参考书第9章自测题 |
|
www.nanhushi.com 佚名 不详 |
一、选择题: 1.以下正确的描述是 在Visual Basic应用程序中 A.过程的定义可以嵌套,但过程的调用不能嵌套 B.过程的定义不可以嵌套,但过程的调用可以嵌套 C.过程的定义和过程的调用均可以嵌套 D.过程的定义和过程的调用均不能嵌套 2.阅读程序 Function F(a As Integer) b=0 Static c b=b+1 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.4 B.4 C.4 D.4 4 5 6 7 4 6 8 9 3. 阅读程序: Sub subP(b() As Integer) Fori=1 To 4 b(i) = 2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1) = 5 a(2) = 6 a(3) = 7 a(4) = 8 subP a() For i= 1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为 A.2 B.5 C.10 D.出错 4 6 12 6 7 14 8 8 16 4. 假定有以下两个过程: Sub S 1 (By Val x As Integer, By Val y As Integer) Dim t As Integer t=x x=y y=t End Sub Sub S2(x As Integer, y As Integer) Dim t As Integer t=x x=y y=t End Sub 则以下说法中正确的是 A.用过程S1可以实现交换两个变量的值的操作,S2不能实现 B.用过程S2可以实现交换两个变量的值的操作,S1不能实现 C.用过程S1和S2都可以实现交换两个变量的值的操作 D.用过程S1和S2都不能实现交换两个变量的值的操作 5. 假定有下面的过程: Function Func(a As Integer, b As Integer) As Integer Static m As Integer, i As Integer m=0 i=2 i=i+m+1 m=i+a+b Func=m End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim k As Integer,m As Integer Dim p As Integer k=4 m=1 p=Func(k,m) Print p; p = Func(k, m) Print p End Sub 程序运行后,单击命令按钮,输出结果为 A.8 17 B.8 16 C.8 20 D.8 8
二、填空题: 1.在过程定义中出现的变量名叫做__________参数,而在调用过程时传送给过程的________、________、________ 或 ________ 叫做 ________ 参数 2.在窗体上画一个命令按钮,然后编写如下程序: Sub inc(a As Integer) Static x As Integer x=x+a Print x; End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 End Sub 程序运行后,第一次单击命令按钮时的输出结果为_____________。 3.在窗体上画一个命令按钮,然后编写如下程序: Function fun(By Val num As Long) As Long Dim k As Long k=1 num= Abs(num) Do While num k = k *(num Mod 10) num= num \ 10 Loop fun = k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n = InputBox("请输入一个数") n = CLng(n) r = fun(n) Print r End Sub 程序运行后,单击命令按钮,在输入对话框中输入234,输出结果为________。 4.在窗体上画一个命令按钮,然后编写如下程序: Function M(x As Integer, y As Integer) As Integer M=IIf(x > y, x, y) End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a=1 b=2 Print M(a, b) End Sub 程序运行后,单击命令按钮,输出结果为_________。

|
|
|
文章录入:杜斌 责任编辑:杜斌 |
|
上一篇文章: 二级VB参考书第8章自测题 下一篇文章: 二级VB参考书第10章自测题 |
【字体:小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
|
|