二級VB在線筆試模擬考場6

1. 例1. 在窗體中添加一個命令按鈕，然后編寫如下程序:
    Private Sub Command1 - Click（）
    Dim I
    For I=1to13Step2
    I=I 1
    rint I;
    ext I
    End Sub
    單擊命令按鈕，程序的執(zhí)行結(jié)果為 （ ）
    A.24681012 B.135791113
    C.258 D.2581114
    2. 執(zhí)行下面的程序段后，x的值為 （ ）
    x=5
    For I=1to20Step2
    x=x I\5
    Next I
    A.21 B.22 C.23 D.24
    3. 執(zhí)行下列程序:
    Private Sub Command1 - Click（）
    For j=1to4
    rint Tab（2*j 1）;12*j
    ext j
    End Sub
    單擊命令按鈕，程序執(zhí)行結(jié)果為 （ ）
    A.12 B.12 C.12 D.12243648
    24 24 24
    36 36 36
    48 48 48
    4.在窗體中畫一個命令按鈕，然后編寫如下的事件過程:
    Private Sub Command1 - Click（）
    For I=1to4
    x=4
    For j=1to3
    x=3
    For k=1to2
    x=x 6
    ext k
    ext j
    ext I
    rint x
    End Sub
    程序運行后，結(jié)果為 （ ）
    A.7 B.15 C.157 D.538
    5. 在文本框上畫上兩個文本框（其Name屬性分別為Text1和Text2）和一個命令按鈕（其Name屬性為Command1），然后編寫如下的事件過程:
    Private Sub Command1 - Click（）
    x=0
    Do While x<50
    x=（x 2）*（x 3）
    =n 1
    Loop
    Text1.Text=Str（n）
    Text2.text=Str（x）
    End Sub
    程序運行后，單擊命令按鈕，在兩個文本框中顯示的值分別為 （ ）
    A.1和0 B.2和72 C.3和50 D.4和168
    6. 閱讀下面的程序段:
    for I=1to3
    for j=1to I
    for k=j to3
    a=a 1
    ext k
    ext j
    next I
    執(zhí)行上面的三重循環(huán)后，a的值為 （ ）
    A.3 B.9 C.14 D.21
    7. 設(shè)a=6，則執(zhí)行x=IIF（a>5，-1，0）后，x的值是 （ ）
    A.5 B.6 C.0 D.-1
    8. 在窗體上畫一個命令按鈕，然后編寫如下的事件過程:
    Private Sub Command1 - Click（）
    x=0
    Do Until x=-1
    a=I utBox（″請輸入A的值″）
    a=Val（a）
    =I utBox（″請輸入B的值″）
    =Val（b）
    x=I utBox（″請輸入X的值″）
    x=Val（x）
    a=a b x
    Loop
    rint a
    End Sub
    程序運行后，單擊命令銨扭，一次在輸入對話框中輸入5、4、3、2、1、-1，則輸出結(jié)果為（ ）
    A.2 B.3 C.14 D.15
    9. 在窗體中添加命令按鈕，編寫如下程序:
    Private Sub Command1 - Click（）
    a=0
    For m=1to10
    a=a 1
    =0
    For j=1to10
    a=a 1
    =b 2
    ext j
    ext m
    rint a，b
    End Sub
    單擊命令按鈕，程序的執(zhí)行結(jié)果為 （ ）
    A.10，20 B.20，110 C.110，20 D.200，110