<address id="ousso"></address>
<form id="ousso"><track id="ousso"><big id="ousso"></big></track></form>
  1. 試題

    9月計算機二級考試VB測試題

    時間:2025-03-31 13:06:03 試題 我要投稿

    2017年9月計算機二級考試VB測試題

      2017年計算機二級考試將在就業開始。你報考了VB科目嗎?你知道怎樣復習計算機二級考試VB 科目嗎?為了方便考生備考計算機二級考試VB 科目。下面是小編為大家帶來的計算機二級考試VB測試題,歡迎閱讀。

    2017年9月計算機二級考試VB測試題

      測試題一:

      1. 下面關于圖片框和圖像框的說法中正確的是(   )

      (A) 圖像框和圖片框均可通過Print方法顯示文本

      (B) 在圖像框里只能顯示圖片,不能包含其它控件,而圖片框可以包含控件

      (C) 圖像框比圖片框占用的內存多、運行速度慢

      (D) 在圖片框和圖像框中顯示的圖片均可放大和縮小

      2. 在窗體上畫兩個名稱為Text1和Text2的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

      Private Sub Command1_Click( )

      Dim x As Integer, n As Integer

      x = 1

      n = 0

      Do While x < 20

      x = x * 3

      n = n + 1

      Loop

      Text1.Text = Str(x)

      Text2.Text = Str(n)

      End Sub

      程序運行后,單擊命令按鈕,在兩個文本框中顯示的值分別是(   )

      (A)15和1 (B)27和3 (C)195和3 (D)600和4

      3. 在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

      Private Sub Command1_Click( )

      Dim i As Integer, n As Integer

      For i = 0 To 50

      i = i + 3

      n = n + 1

      If i > 10 Then Exit For

      Next

      Text1.Text = Str(n)

      End Sub

      程序運行后,單擊命令按鈕,在文本框中顯示的值是(   )

      (A)2 (B)3 (C)4 (D)5

      4. 在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

      Private Sub Comman1_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

      程序運行后,單擊命令按鈕,如果輸入3,則在窗體上顯示的內容是(   )

      (A)3 (B)4 (C)5 (D)6

      5. 在窗體上畫一個命令按鈕,然后編寫如下事件過程:

      Private Sub Command1_Click( )

      For i = 1 To 4

      x = 4

      For j = 1 To 3

      x = 3

      For k = 1 To 2

      x = x + 6

      Next k

      Next j

      Next i

      Print x

      End Sub

      程序運行后,單擊命令按鈕,輸出結果是(   )

      (A)7 (B)15 (C)157 (D)538

      6. 在窗體上畫一個命令按鈕,然后編寫如下事件過程:

      Private Sub Command_Click( )

      x = 0

      Do Until x = -1

      a = InputBox(“請輸入A的值:”)

      a = Val(a)

      b = InputBox(“請輸入B的值:”)

      b = Val(b)

      x = InputBox(“請輸入x的值:”)

      x = Val(x)

      a = a + b + x

      Loop

      Print a

      End Sub

      程序運行后,單擊命令,依次在輸入對話框中輸入5、4、3、2、1、-1,則輸出的結果為(   )

      (A)2 (B)3 (C)14 (D)15

      7. 在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Label1的標簽,然后編寫如下事件過程:

      Private Sub Command1_Click( )

      s = 0

      For i =1 To 15

      x = 2 * i -1

      If x Mod 3 =0 Then s = s + 1

      Next i

      Label1.Caption = s

      End Sub

      程序運行后,單擊命令按鈕,則標簽中顯示的內容是(   )

      (A)1 (B)5 (C)27 (D)45

      8. 在窗體上畫一個名稱為Command1的命令按鈕和兩個名稱分別為Text1、Text2的文本框,然后編寫如下事件過程:

      Private Sub Command1_Click( )

      a = Text1.Text

      Select Case n

      Case 1 To 20

      x = 10

      Case 2,4,6

      x = 20

      Case Is < 10

      x = 30

      Case 10

      x = 40

      End Select

      Text2.Text = x

      End Sub

      程序運行后,如果在文本框Text1中輸入10,然后單擊命令按鈕,則在Text2中顯示的內容是(   )

      (A)10 (B)20 (C)30 (D)40

      9. 有如下程序:

      a = 10

      b = 4

      For j = 1 To 20 Step -2

      a = a + 5

      b = b + 4

      Next j

      Print a;b

      運行后,輸出的結果是(   )

      (A)10 4 (B)60 24 (C)110 44 (D)55 40

      10. 設有如下程序:

      Private Sub Command1_Click( )

      Dim sum As Double, x As Double

      sum = 0

      n = 0

      For i = 1 To 5

      x = n / i

      n = n + 1

      sum = sum + x

      Next

      End Sub

      該程序通過For循環計算一個表達式的值,這個表達式是(   )

      (A)1 + 1 /2 + 3/ 4 + 4 / 5 (B)1 + 1 /2 + 2 / 3 + 3 / 4

      (C)1 / 2 + 2 / 3 + 3 / 4 + 4 / 5 (D)1 + 1 / 2 + 1 / 3 + 1 / 4 + 1 / 5

      測試題二:

      1. 語句Print Format$(12345,”#######”);Format$(12345,”###”)的輸出結果是(   )

      (A)12345□□12345 (B)1234512345

      (C)12345□123 (D)□□12345123

      2. 下列語句執行后,產生的信息框的標題是(   )

      Dim s As String

      s = MsgBox(“ABCD”,,”EFGH,””,5)

      (A)ABCD (B)無標題 (C)EFGH (D)程序出錯

      3. 執行語句Print Format(1234.567, “##,##0.00”)后,輸出結果是(   )

      (A)1234.57 (B)1,234.57 (C)1,234.567 (D)1,234.56

      4. 下列事件過程運行時,信息框中出現的結果是(   )

      Private Sub Command1_Click( )

      MsgBox Str(123+123)

      End Sub

      (A)123+345 (B)123 (C)246 (D)顯示出錯信息

      5. 以下能夠觸發文本框Change事件的操作是(   )

      (A)文本框失去焦點 (B)文本框獲得焦點

      (C)設置文本框的焦點 (D)改變文本框的內容

      6. 表示滾動條控件取值范圍最大值的屬性是(   )

      (A)Max (B)LargeChange (C)Value (D)Max-Min

      7. 當某個單選按鈕處于選中狀態時,它的(   )屬性為Ture

      (A)Caption (B)Value (C)Style (D)Checked

      8. 復選框的狀態有(   )種,可通過設置它的(   )屬性來設置它的狀態

      (A)1 (B)2 (C)3 (D)4

      (A)Alignment (B)Value (C)Style (D)Checked

      9. 要使文本框在顯示文字時,只顯示出一串“*”,則應把它的(   )屬性設置為“*”

      (A)Caption (B)PasswordChar (C)Text (D)Value

      10. 在下面四組圖形格式中,全部都是Visual Basic支持的圖形文件是(   )

      (A) 位圖、圖標、3DS圖形文件、GIF文件

      (B) 位圖、Flash圖形文件、圖標文件、GIF文件

      (C) 位圖、Flash圖形文件、3DS圖形文件、GIF文件

      (D) 位圖、圖標、圖元文件、JPEG文件、GIF文件


    【9月計算機二級考試VB測試題】相關文章:

    9月計算機二級考試VB真題03-19

    2017年9月計算機二級考試《VB》自測試題07-22

    2017年9月計算機二級VB測試題及答案05-11

    2016年9月計算機二級《VB》測試題及答案02-01

    計算機二級VB考試測試題05-22

    2017年9月計算機二級考試VB考試題02-10

    2017年9月計算機二級VB臨考測試題及答案03-23

    2016年9月計算機二級VB考前測試題與解析07-20

    2016年9月計算機二級《VB》考試試題05-12

    <address id="ousso"></address>
    <form id="ousso"><track id="ousso"><big id="ousso"></big></track></form>
    1. 日日做夜狠狠爱欧美黑人