精选优质文档-倾情为你奉上Visual Basic 期末复习题库 1) 下列程序运行后，输出的结果为_。 B=1 Do while (b40) b=b*(b+1) Loop Print b a) 42 b) 39 c) 6 d) 1 答案：A 2) 设执行以下程序段时依次输入1、3、5，执行结果为_。 Dim a(4) As Integer Dim b(4) As Integer For K =0 To 2 a(K+1) =Val(InputBox(“请输入数据：) b(3-K) =a(K+1) Next K Print b(K) a) 1 b) 3 c) 5 d) 0 答案：A 3) 下列程序执行后，变量s的值为_。 Dim s As long ,x As Integer
