2012级VB语言程序设计期末考试卷

  For i = 3 To 1 Step-1

    Print Spc(5-i);

    For j = 1 To 2 * i-1

      Print "*";

    Next j

    Print

  Next i

（A） *                    （B）*****                     （C）*****            （D）*****

 ***                               ***                        ***                         ***

*****                  *                     *                            *

8. 哪个程序段不能分别正确显示1！、2！、3！、4！的值(  )。

（A）For i = 1 To 4                （B）For i = 1 To 4

        n = 1                                       For j = 1 To i

        For j = 1 To i                           n = 1

          n = n * j                                n = n * j

        Next j                                     Next j

        Print n                                         Print n

      Next i                                   Next i

（C）n = 1                              （D）n = 1

      For j = 1 To  4                                  j=1

         n = n * j                                 Do While j<=4

         Print n                                        n = n * j

      Next j                                                Print n

                                                              j=j+1

  Loop

9．程序运行后，单击命令按钮，结果为(  )。

Private Sub Command1_Click()

      n = 6

      f = 1

      s = 0

      For  I  =  2  To  n  Step 2

        f = f * i

        s = s + f

      Next i

      Print s

End Sub

（A） 72   （B） 6  （C）58   （D） 10

10.下列程序运行后输出的结果是(  )

  a$="AB" : b$="BC" : c$="CA"

 For j = 1 To 2

        a$ = b$ : b$=c$ : c$=a$

 Next  j

 Print  a$　+　b$　+　c$

 End

（A） BCCAAB   （B） CAABBC   （C） BCCABC  （D） CABCCA

11.下列可以作为Visual Basic中所允许的形式的数是 (  )。

A.±55      B. 10^^(1.255)    C.2.5E      D. 12E3

12.函数INT(ABS(99-100)/2)的值是( )。 

A) 1  B) 0   C)“1”   D“0”

13.设a=2,b=3,c=4,d=5,表达式a>b And c<=d OR 2*a>c的值是(  )。

A.True      B.False    C.-l         D. 1

14.设a=2,b=3,c=4,d=5,表达式3>2*b or a=c and b<>c or c>d的值是(  )。

A. True       B.  False    C. -1          D.  l

 15．计算结果为0的表达式是（ ）。  

A．Int(2.4)+Int(-2.8)    B.Cint(2.4)+Cint(-2.8)  

C．Fix(2.4)+Int(-2.8)           D.Fix(2.4)+Fix(-2.8)