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

二级VB参考书第8章自测题

www.nanhushi.com     佚名   不详 

一、选择题:
1.用下面的语句所定义的数组的元素个数是
   Dim A(-3 To 5) As Integer
 A.6
 B.7
 C.8
 D.9
2. 用下面的语句所定义的数组的元素个数是
   Dim arr(3 To 5, -2 To 2)
 A.20
 B.12
 C.15
 D.24
3. 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
   Private Sub Command1_Click()
      Dim Arr1(10), arr2(10) As Integer
      n=3
      For i = 1 To 5
         Arr1(i) = i
         arr2(n) = 2 * n + i
      Next i
      Print arr2(n); Arr1(n)
   End Sub
程序运行后,单击命令按钮,输出结果是
 A.11 3
 B.3 11
 C.13 3  
 D.3 13
4. 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
   Option Base 1
   Private Sub Command1_Click()
      Dim a(10), p(3) As Integer
      k=5
      For i= 1 To 10
         a(i)= i
      Next i
      For i= 1 To 3
         p(i) = a(i * i)
      Next i
      For i = 1 To 3
         k = k + p(i) * 2
      Next i
      Prim k
   End Sub
程序运行后,单击命令按钮,输出结果是
 A.35
 B.28
 C.33
 D.37
5. 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
   Option Base 1
   Private Sub Command1_Click()
     Dim a
     a = Array(1, 2, 3, 4)
     j=1
     For i = 4 To 1 Step -1
         s = s + a(i)*j
         j =j * 10
     Next i
     Print s
   End Sub
运行上面的程序,单击命令按钮,其输出结果是
 A.4321
 B.12
 C.34
 D.1234
6. 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
   Option Base 1
   Private Sub Command1_Click()
     Dim Arr(3) As Integer
     For i = 1 To 3
        For j = 1 To 3
           Arr(j) = Arr(i) + 1
        Next j
     Next i
     Print Arr(3)
   End Sub
程序运行后,单击命令按钮,其输出结果为
 A.7
 B.6
 C.5
 D.4


二、填空题
1.控件数组的名字由__________属性指定,而数组中的每个元素由_________属性指定。
2.由Array函数建立的数组必须是_________类型。
3.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
    Private Sub Command1_Click()
      Dim n() As Integer
      Dim a,b As Integer
      a = InputBox("Enter the first number")
      b = InputBox("Enter the second number")
      ReDim n(a To b)
      For k = LBound(n,1) To UBound(n,1)
       n(k) = k
       Print "n("; k; ") = "; n(k)
      Next k
    End Sub
  程序运行后,单击命令按钮,在输入对话框中分别输入2和3,输出结果为_________。
4.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
    Private Sub Command1_Click()
     Dim a(5)
     For i=0 To 4
      a(i) = i + 1
      t=i+1
      If t = 3 Then
       Print a(i);
       a(t - 1) = a(i - 2)
      Else
       a(t) = a(i)
      End If
      If i = 3 Then a(i + 1) = a(t - 4)
      a(4) = 1
      Prim a(i);
     Next i
    End Sub
  程序运行后,单击命令按钮,输出结果是__________。
5.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
    Private Sub Command1_Click()
     Dim M(10) As Integer
     Fork= 1 To 10
     M(k) = 12 - k
     Next k
     x=6
     Print M(2 + M(x))
    End Sub
  程序运行后,单击命令按钮,输出结果是___________。 
6.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
    Private Sub Command1_Click()
     Dim a(5, 5)
     For i = 1 To 3
      For j = 1 To 4
         a(i, j) = i * j
      Next j
     Next i
     For n= 1 To 2
      For M = 1 To 3
         Print a(M, n);
      Next M
     Next n
    End Sub
  程序运行后,单击命令按钮,输出结果是_____________。


三、编程题
1.从键盘上输入 10个整数,并放入一个一维数组中,然后将其前5个元素与后5个元素对换,即:第一个元素与第十个元素互换,第二个元素与
第九个元素互换……第五个元素与第六个元素互换。分别输出数组原来各元素的值和对换后各元素的值。
2.设有如下两组数据:
  A:2,8,7,6,4,28,70,25
  B:79,27,32,41,57,66,78,80
  编写一个程序,把上面两组数据分别读入两个数组中,然后把两个数组中对应下标的元素相加,即2+79,8+27……25+80,并把相应的结果放
入第三个数组中,最后输出第三个数组的值。
3.有一个n×m的矩阵,编写程序,找出其中最大的那个元素所在的行和列,并输出其值及行号和列号。
4.某单位开运动会,共有10人参加男子100米短跑,运动员号和成绩如下:
   207号 14.5秒    077号 15.1秒
   156号 14.2秒    231号 14.7秒
   453号 15.2秒    276号 13.9秒
   096号 15.7秒    122号 13.7秒
   339号 14.9秒    302号 14.5秒
编写程序,按成绩排出名次,并按如下格式输出:
名次    运动员号   成绩
1       ……       ……
2       ……       ……
3       ……       ……
…      ……       ……
10      ……       ……

 

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

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

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

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

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