您现在的位置: 中国男护士网 >> 考试频道 >> 计算机等级 >> 二级辅导 >> VB >> 模拟题 >> 正文    
  二级VB参考书第9章自测题 【注册男护士专用博客】          

二级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
  程序运行后,单击命令按钮,输出结果为_________。

 

文章录入:杜斌    责任编辑:杜斌 
  • 上一篇文章:

  • 下一篇文章:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
     

    联 系 信 息
    QQ:88236621
    电话:15853773350
    E-Mail:malenurse@163.com
    免费发布招聘信息
    做中国最专业男护士门户网站
    最 新 热 门
    最 新 推 荐
    相 关 文 章
    没有相关文章
    专 题 栏 目

      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)                            【进男护士社区逛逛】
    姓 名:
    * 游客填写  ·注册用户 ·忘记密码
    主 页:

    评 分:
    1分 2分 3分 4分 5分
    评论内容:
  • 请遵守《互联网电子公告服务管理规定》及中华人民共和国其他各项有关法律法规。
  • 严禁发表危害国家安全、损害国家利益、破坏民族团结、破坏国家宗教政策、破坏社会稳定、侮辱、诽谤、教唆、淫秽等内容的评论 。
  • 用户需对自己在使用本站服务过程中的行为承担法律责任(直接或间接导致的)。
  • 本站管理员有权保留或删除评论内容。
  • 评论内容只代表网友个人观点,与本网站立场无关。