考试首页 | 考试用书 | 培训课程 | 模拟考场 | 考试论坛  
全国  |             |          |          |          |          |         
  当前位置:计算机等级 > 二级考试 > Visual Basic > VB模拟试题 > 文章内容
  

全国计算机等级考试二级VB程序设计模拟试题七

中华IT学院   【 】  [ 2017年2月7日 ]

写出下面程序的运行结果(10分)

  1. Private Sub Command1_Click()
         x = 0
         n = InputBox("")
         For i = 1 To n
             For j = 1 To i
                 x = x + 1
             Next j
         Next i
         Print x
       End Sub
程序运行后,单击命令按钮,如果输入5,则在窗体上显示的内容是:

2.

Option base 1

Private sub subp(b() As Integer)
    for i=1 to 4

      b(i)=2*i

    next i 

End Function
Private Sub Command1_Click()
   Dim a() 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
单击命令按钮后,程序的运行结果为:

1. 15          2.   2

                     4

                     6

                     8

分享到:
本文纠错】【告诉好友】【打印此文】【返回顶部
将考试网添加到收藏夹 | 每次上网自动访问考试网 | 复制本页地址,传给QQ/MSN上的好友 | 申请链接 | 意见留言 TOP
关于本站  网站声明  广告服务  联系方式  站内导航  考试论坛
Copyright © 2006-2017 中华考试网(Examw.com) All Rights Reserved  营业执照