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

写出下面程序的运行结果（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

1． 15          2.   2

                     4

                     6

                     8

• 2018年—2011年岩土工程师考试真题汇总
• 2019造价工程师《土建工程》模拟试题及答案（2）
• 2019年英语四级阅读理解专项练习（十六）
• 2019年英语四级阅读理解专项练习（十七）
• 2019年英语四级阅读理解专项练习（十八）
• 2020年二级建造师《市政实务》预习题及参考答案（10）
• 2019年房地产估价师考试制度与政策章节精讲题：城镇土地使用税
• 2020考研英语：暑期复习六大注意事项
• 2019年全国公共英语考试二级词汇和语法专项练习（3）
• 2020年监理工程师考试《案例分析》备考试题（9）