• <sub id="h4knl"><ol id="h4knl"></ol></sub>
    <sup id="h4knl"></sup>
      <sub id="h4knl"></sub>

      <sub id="h4knl"><ol id="h4knl"><em id="h4knl"></em></ol></sub><s id="h4knl"></s>
      1. <strong id="h4knl"></strong>

      2. 全國計算機二級vb考試題庫及答案

        時間:2024-10-20 09:04:42 計算機等級 我要投稿
        • 相關推薦

        2016年全國計算機二級vb考試題庫及答案

          一、選擇題((1)~(35)每小題2分,共70分)

        2016年全國計算機二級vb考試題庫及答案

          下列各題A)、B)、C)、D)四個選項中,只有一個選項是正確的,請將正確選項涂寫在答題卡相應位置上,答在試卷上不得分。

          (1)下列關于棧的描述中錯誤的是______。

          A) 棧是先進后出的線性表

          B) 棧只能順序存儲

          C) 棧具有記憶作用

          D)對棧的插入與刪除操作中,不需要改變棧底指針

          (2)數據的存儲結構是指______。

          A)存儲在外存中的數據 B)數據所占的存儲空間量

          C)數據在計算機中的順序存儲方式 D)數據的邏輯結構在計算機中的表示

          (3)對于長度為n的線性表,在最壞情況下,下列各排序法所對應的比較次數中正確的是______。

          A)冒泡排序為n/2 B)冒泡排序為n

          C)快速排序為n D)快速排序為n(n-1)/2

          (4)對長度為n的線性表進行順序查找,在最壞情況下所需要的比較次數為______。

          A)log2n B)n/2 C)n D)n+1

          (5)下列對于線性鏈表的描述中正確的是______。

          A) 存儲空間不一定是連續,且各元素的存儲順序是任意的

          B) 存儲空間不一定是連續,且前件元素一定存儲在后件元素的前面

          C) 存儲空間必須連續,且前件元素一定存儲在后件元素的前面

          D) 存儲空間必須連續,且各元素的存儲順序是任意的

          (6)下列對于軟件測試的描述中正確的是______。

          A) 軟件測試的目的是證明程序是否正確

          B) 軟件測試的目的是使程序運行結果正確

          C) 軟件測試的目的是盡可能多地發現程序中的錯誤

          D) 軟件測試的目的是使程序符合結構化原則

          (7)為了使模塊盡可能獨立,要求______。

          A) 模塊的內聚程度要盡量高,且各模塊間的耦合程度要盡量強

          B) 模塊的內聚程度要盡量高,且各模塊間的耦合程度要盡量弱

          C) 模塊的內聚程度要盡量低,且各模塊間的耦合程度要盡量弱

          D) 模塊的內聚程度要盡量低,且各模塊間的耦合程度要盡量強

          (8)下列描述中正確的是______。

          A)程序就是軟件 B)軟件開發不受計算機系統的限制

          C)軟件既是邏輯實體,又是物理實體

          D)軟件是程序、數據與相關文檔的集合

          (9)數據獨立性是數據庫技術的重要特點之一。所謂數據獨立性是指______。

          A)數據與程序獨立存放

          B)不同的數據被存放在不同的文件中

          C)不同的數據只能被對應的應用程序所使用

          D)以上三種說法都不對

          (10)用樹形結構表示實體之間聯系的模型是______。

          A)關系模型 B)網狀模型 C)層次模型 D)以上三個都是

          (11)在窗體(名稱為Form1)上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫一個事件過程。程序運行后,如果在文本框中輸入一個字符,則把命令按鈕的標題設置為“計算機等級考試”。以下能實現上述操作的事件過程是______。

          A) Private Sub Text1_Change()

          Command1.Caption = "計算機等級考試"

          End Sub

          B) Private Sub Command1_ Click ()

          Caption = "計算機等級考試"

          End Sub

          C) Private Sub Form1_ Click ()

          Text1.Caption = "計算機等級考試"

          End Sub

          D) Private Sub Command1_ Click ()

          Text1.Text = "計算機等級考試"

          End Sub

          (12)設a=5,b=4,c=3,d=2下列表達式的值是______。

          3 > 2 * b Or a = c And b <> c Or c > d

          A)1 B)True C) False D)2

          (13)設a = "MicrosoftVisualBasic" ,則以下使變量b的值為“VisualBasic”的語句是______。

          A) b = Left(a, 10) B) b = Mid(a, 10)

          C) b = Right(a, 10) D) b = Mid(a, 11, 10)

          (14)假定有如下的窗體事件過程:

          Private Sub Form_Click()

          a$ = "Microsoft Visual Basic"

          b$ = Right(a$, 5)

          c$ = Mid(a$, 1, 9)

          MsgBox a$, 34, b$, c$, 5

          End Sub

          程序運行后,單擊窗體,則在彈出的信息框的標題欄中顯示的信息是______。

          A) Microsoft Visual B) Microsoft

          C) Basic D)5

          (15)設a = "a",b = "b",c = "c",d = "d",執行語句x=IIf((ad),”A”,”B”)后,x的值為 ______。

          A)”a” B)”b” C)”B” D)”A”

          (16)為了使命令按鈕(名稱為Command1)右移200,應使用的語句是______。

          A) Command1.Move -200

          B) Command1.Move 200

          C) Command1.Left = Command1.Left + 200

          D) Command1.Left = Command1.Left - 200

          (17)在窗體上畫一個文本框,然后編寫如下事件過程:

          Private Sub Form_Click()

          x = InputBox("請輸入一個整數")

          Print x + Text1.Text

          End Sub

          程序運行時,在文本框中輸入456,然后單擊窗體,在輸入對話框中輸入123,單擊“確定”按鈕后,在窗體上顯示的內容為______。

          A) 123 B)456 C) 479 D) 123456

          (18)在窗體上畫一個文本框和一個計時器控件,名稱分別為Text1和Timer1,在屬性窗口中把計時器的Interval屬性設置為1000,Enabled屬性設置為False。程序運行后,如果單擊命令按鈕,則每隔一秒鐘在文本框中顯示一次當前的時間。以下是實現上述操作的程序:

          Private Sub Command1_Click()

          Timer1.______

          End Sub

          Private Sub Timer1_Timer()

          Text1.Text = Time

          End Sub

          在下劃線處應填入的內容是______。

          A) Enabled = True B) Enabled = False

          C) Visible = True D) Visible = False

          (19)假定在圖片框Picture1中裝入了一個圖形,為了清除該圖形(不刪除圖片框),應采用的正確方法是______。

          A)選擇圖片框,然后按Del鍵

          B)執行語句Picture1.Picture = LoadPicture ("")

          C)執行語句Picture1.Picture =""

          D)選擇圖片框,在屬性窗口中選擇Picture屬性條,然后按回車鍵

          (20)在窗體上畫一個名稱為List1的列表框,一個名稱為Label1的標簽,列表框中顯示若干個項目。當單擊列表框中的某個項目時,在標簽中顯示被選中項目的名稱。下列能正確實現上述操作的程序是:_____。

          A)Private Sub List1_Click()

          Label1.Caption = List1.ListIndex

          End Sub

          B)Private Sub List1_Click()

          Label1.Name=List1.ListIndex

          End Sub

          C) Private Sub List1_Click()

          Label1.Name=List1.Text

          End Sub

          D) Private Sub List1_Click()

          Label1.Caption =List1.Text

          End Sub

          (21)在窗體上畫一個命令按鈕,其名稱為Command1,然后編寫如下事件過程:

          Private Sub Command1_Click()

          Dim i As Integer, x As Integer

          For i = 1 To 6

          If i = 1 Then x = i

          If i <= 4 Then

          x = x + 1

          Else

          x = x + 2

          End If

          Next i

          Print x

          End Sub

          程序運行后,單擊命令按鈕,其輸出結果為______。

          A)9 B)6 C)12 D)15

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

          Private Sub Command1_Click()

          c = “ABCD”

          For n= 1 To 4

          Print ______

          Next

          End Sub

          程序運行后,單擊命令按鈕,要求在窗體上顯示如下內容

          D

          CD

          BCD

          ABCD

          則在______處填入的內容為。

          A) Left(c,n) B) Right(c,n) C) Mid(c,n,1) D) Mid(c,n,n)

          (23)執行以下程序段

          Dim i As Integer, x As Integer

          x = 0

          For i = 20 To 1 Step -2

          x = x + i \ 5

          Next

          Print x

          后,x的值為______。

          A)16 B)17 C)18 D)19

          (24)在Visual Basic工程中,可以作為“啟動對象”的程序是______。

          A)任何窗體或標準模塊 B)任何窗體或過程

          C)Sub Main過程或其他任何模塊 D) Sub Main過程或任何窗體

          (25)假定建立了一個名為Command1的命令按鈕數組,則以下說法中錯誤的是______。

          A)數組中每個命令按鈕的名稱(Name屬性)均為Command1

          B)數組中每個命令按鈕的標題(Caption屬性)都一樣

          C)數組中所有命令按鈕可以使用同一個事件過程

          D)用名稱Command1(下標)可以訪問數組中的每個命令按鈕

          (26)把窗體的KeyPreview屬性設置為True,然后編寫如下事件過程

          Private Sub Form_KeyPress(KeyAscii As Integer)

          Dim ch As String

          ch = Chr(KeyAscii)

          KeyAscii = Asc(UCase(ch))

          Print Chr(KeyAscii + 2)

          End Sub

          程序運行后,按鍵盤上的“A”鍵,則在窗體上顯示的內容是______。

          A)A B) B C)C D)D

          (27)在窗體上畫一個命令按鈕和一個文本框,名稱分別為Command1和Text1,然后編寫如下程序:

          Private Sub Command1_Click()

          a=InputBox(“請輸入日期(1~31)”)

          t=”旅游景點:” _

          & IIf ( a > 0 And a <= 10,”長城”,””) _

          & IIf ( a >10 And a <= 20,”故宮”,””) _

          & IIf ( a > 20 And a <= 31,”頤和園”,””)

          Text1.Text = t

          End Sub

          程序運行后,如果從鍵盤上輸入16,則在文本框顯示的內容是______。

          A) 旅游景點:長城故宮 B) 旅游景點:長城頤和園

          C) 旅游景點:頤和園 D) 旅游景點:故宮

          (28)在窗體上畫一個名稱為Label1的標簽,然后編寫如下事件過程:

          Private Sub Form_Click()

          Dim arr(10, 10) As Integer

          Dim i As Integer, j As Integer

          For i = 2 To 4

          For j = 2 To 4

          arr(i, j) = i * j

          Next j

          Next i

          Label1.Caption = Str(arr(2, 2) + arr(3, 3))

          End Sub

          程序運行后,單擊窗體,在標簽中顯示的內容是______。

          A)12 B)13 C)14 D)15

          (29)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下通用過程和命令按鈕的事件過程:

          Private Function fun(ByVal m As Integer)


        更多相關試題推薦:

        1.2016下半年計算機二級VB上機考試答題攻略

        2.2016年計算機二級VB考試沖刺題(含答案)

        3.2016年計算機二級考試vb題庫及答案

        4.2016計算機二級考試vb復習試題及答案

        5.2016最新計算機二級vb考試試題及答案

        6.2016年計算機二級考試vb試題

        7.vb計算機二級考試試題

        8.2016年計算機二級《VB》備考練習題及答案

        9.2016年全國計算機二級vb考試題庫及答案

        10.2016年計算機二級vb試題庫

          If m Mod 2 = 0 Then

          fun = 2

          Else

          fun = 1

          End If

          End Function

          Private Sub Command1_Click()

          Dim i As Integer, s As Integer

          s = 0

          For i = 1 To 5

          s = s + fun(i)

          Next

          Print s

          End Sub

          程序運行后,單擊命令按鈕,在窗體上顯示的是______。

          A)6 B)7 C)8 D)9

          (30)閱讀程序:

          Option Base 1

          Dim arr() As Integer

          Private Sub Form_Click()

          Dim i As Integer, j As Integer

          ReDim arr(3, 2)

          For i = 1 To 3

          For j = 1 To 2

          arr(i, j) = i * 2 + j

          Next j

          Next i

          ReDim Preserve arr(3, 4)

          For j = 3 To 4

          arr(3, j) = j + 9

          Next j

          Print arr(3, 2) + arr(3, 4)

          End Sub

          程序運行后,單擊窗體,輸入結果為______。

          A)21 B)13 C)8 D)25

          (31)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序:

          Option Base 1

          Private Sub Command1_Click()

          Dim c As Integer, d As Integer

          d = 0

          c = 6

          x = Array(2, 4, 6, 8, 10, 12)

          For i = 1 To 6

          If x(i) > c Then

          d = d + x(i)

          c = x(i)

          Else

          d = d - c

          End If

          Next

          Print d

          End Sub

          程序運行后,如果單擊命令按鈕,則在窗體上輸出的內容為______。

          A) 10 B) 16 C) 12 D) 20

          (32)設有如下程序:

          Private Sub Command1_Click()

          Dim c As Integer, d As Integer

          c = 4

          d = InputBox("請輸入一個整數")

          Do While d > 0

          If d > c Then

          c = c + 1

          End If

          d = InputBox("請輸入一個整數")

          Loop

          Print c + d

          End Sub

          程序運行后,單擊命令按鈕,如果在輸入對話框中依次輸入1、2、3、4、5、6、7、8、9、0,則輸出結果是______。

          A)12 B)11 C)10 D)9

          (33)在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框,在文本框中輸入以下字符串:Microsoft Visual Basic Programming

          然后編寫如下事件過程:

          Private Sub Command1_Click()

          Open "d:\temp\outf.txt" For Output As #1

          For i = 1 To Len(Text1.Text)

          c = Mid(Text1.Text, i, 1)

          If c >= "A" And c <= "Z" Then

          Print #1, LCase(c)

          End If

          Next i

          Close

          End Sub

          程序運行后,單擊命令按鈕,文件outf.txt中的內容是______。

          A)MVBP B)mvbp C)M D)m

          V v

          B b

          P p

          (34)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序:

          Dim SW As Boolean

          Function func(X As Integer) As Integer

          If X < 20 Then

          Y = X

          Else

          Y = 20 + X

          End If

          func = Y

          End Function

          Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

          SW = False

          End Sub

          Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

          SW = True

          End Sub

          Private Sub Command1_Click()

          Dim intNum As Integer

          intNum = InputBox("")

          If SW Then

          Print func(intNum)

          End If

          End Sub

          程序運行后,單擊命令按鈕,將顯示一個輸入對話框,如果在輸入對話框中輸入25,則程序的執行結果為______。

          A)輸出0 B)輸出25 C)輸出45 D)無任何輸出

          (35)設有如下通用過程:

          Public Sub Fun(a() As Integer, x As Integer)

          For i = 1 To 5

          x = x + a(i)

          Next

          End Sub

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

          Private Sub Command1_Click()

          Dim arr(5) As Integer, n As Integer

          For i = 1 To 5

          arr(i) = i + i

          Next

          Fun arr, n

          Text1.Text = Str(n)

          End Sub

          程序運行后,單擊命令按鈕,則在文本框中顯示的內容是______。

          A)30 B)25 C)20 D)15

          二、填空題(每空2分,共30分)

          請將每空的正確答案寫在答題卡【1】~【15】序號的橫線上,答在試卷上不得分。

          (1)某二叉樹中度為2的結點有18個,則該二叉樹中有 【1】 個葉子結點。

          (2)在面向對象方法中,類的實例稱為 【2】 。

          (3)診斷和改正程序中錯誤的工作通常稱為 【3】 。

          (4)在關系數據庫中,把數據表示成二維表,每一個二維表稱為 【4】 。

          (5)問題處理方案的正確而完整的描述稱為 【5】 。

          (6)以下語句輸出結果是 【6】 。

          Print Int(12345.6789 * 100 + 0.5) / 100

          (7)在窗體上畫一個文本框和一個圖片框,然后編寫如下兩個事件過程:

          Private Sub Form_Click()

          Text1.Text = "VB程序設計"

          End Sub

          Private Sub Text1_Change()

          Picture1.Print "VB Programming"

          End Sub

          程序運行后,單擊窗體,則在文本框中顯示的內容是 【7】 ,而在圖片框中顯示的內容是 【8】 。

          (8)閱讀下面的程序:

          Private Sub Form_Click()

          Dim Check As Boolean, Counter As Integer

          Check = True

          Counter = 5

          Do

          Do While Counter < 20

          Counter = Counter + 1

          If Counter = 10 Then

          Check = False

          Exit Do

          End If

          Loop

          Loop Until Check = False

          Print Counter

          End Sub

          程序運行后,單擊窗體,輸出結果為 【9】 。

          (9)設有如下程序:

          Private Sub Form_Click()

          Dim n As Integer, s As Integer

          n = 8

          s = 0

          Do

          s = s + n

          n = n - 1

          Loop While n > 0

          Print s

          End Sub

          以上程序的功能是 【10】 。程序運行后,單擊窗體,輸出結果為 【11】 。

          (10)設有如下程序:

          Option Base 1

          Private Sub Command1_Click()

          Dim arr1

          Dim Min As Integer, i As Integer

          arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43)

          Min = 【12】

          For i = 2 To 8

          If arr1(i) < Min Then 【13】

          Next

          Print "最小值是:"; Min

          End Sub

          以上程序的功能是:用Array函數建立一個含有8個元素的數組,然后查找并輸出該數組中各元素的最小值。請填空。

          (11)在名稱為Form1的窗體上畫一個文本框,其名稱為Text1,在屬性窗口中把該文本框的MultiLine屬性設置為True,然后編寫如下的事件過程:

          Private Sub Form_Click()

          Open "d:\test\smtext1.txt" For Input As #1

          Do While Not 【14】

          Line Input #1, aspect$

          whole$ = whole$ + aspect$ + Chr$(13) + Chr$(10)

          Loop

          Text1.Text = whole$

          Close #1

          Open "d:\test\smtext2.txt" For Output As #1

          Print #1, 【15】

          Close #1

          End Sub

          上述程序的功能是,把磁盤文件smtext1.txt的內容讀到內存并在文本框中顯示出來,然后把該文本框中的內容存入磁盤文件smtext2.txt。請填空。

          【參考答案】

          選擇題:

          1---5 BDDCA

          6---10 CBDDC

          11--15 ABBCD

          16--20 CDABD

          21--25 ABCDB

          26--30 CDBBA

          31--35 CDDDA

          填空題:

          【1】19

          【2】 對象

          【3】 程序調試

          【4】 關系

          【5】 算法

          【6】12345.68

          【7】VB程序設計

          【8】 VB Programming

          【9】 10

          【10】 求1-8的和

          【11】36

          【12】 arr1(1)

          【13】min=arr1(i)

          【14】 EOF(1)

          【15】text1.text(或whole$)


        更多相關試題推薦:

        1.2016下半年計算機二級VB上機考試答題攻略

        2.2016年計算機二級VB考試沖刺題(含答案)

        3.2016年計算機二級考試vb題庫及答案

        4.2016計算機二級考試vb復習試題及答案

        5.2016最新計算機二級vb考試試題及答案

        6.2016年計算機二級考試vb試題

        7.vb計算機二級考試試題

        8.2016年計算機二級《VB》備考練習題及答案

        9.2016年全國計算機二級vb考試題庫及答案

        10.2016年計算機二級vb試題庫

        《&.doc》
        将本文的Word文档下载到电脑,方便收藏和打印
        推荐度:
        点击下载文档

        【全國計算機二級vb考試題庫及答案】相關文章:

        計算機二級vb題庫201703-10

        計算機二級vb考試試題及答案12-17

        2016年9月全國計算機vb二級考試題庫03-03

        2016計算機二級VB上機考試試題題庫03-07

        計算機二級vb考試試題(附答案)02-26

        計算機二級考試MSOffice題庫附答案03-04

        計算機二級題庫及答案10-24

        2017全國計算機二級VB考試試題03-06

        全國計算機二級c語言題庫試題及答案03-29

        国产高潮无套免费视频_久久九九兔免费精品6_99精品热6080YY久久_国产91久久久久久无码
      3. <sub id="h4knl"><ol id="h4knl"></ol></sub>
        <sup id="h4knl"></sup>
          <sub id="h4knl"></sub>

          <sub id="h4knl"><ol id="h4knl"><em id="h4knl"></em></ol></sub><s id="h4knl"></s>
          1. <strong id="h4knl"></strong>

          2. 亚洲欧洲中文字幕免费看 | 中文字幕亚洲一区二区va在线 | 最新国产乱理片在线观看 | 亚洲诱惑人的视频在线观看 | 久久99精品亚洲热综合 | 日韩视频在线观看 |

            2016年全國計算機二級vb考試題庫及答案

              一、選擇題((1)~(35)每小題2分,共70分)

            2016年全國計算機二級vb考試題庫及答案

              下列各題A)、B)、C)、D)四個選項中,只有一個選項是正確的,請將正確選項涂寫在答題卡相應位置上,答在試卷上不得分。

              (1)下列關于棧的描述中錯誤的是______。

              A) 棧是先進后出的線性表

              B) 棧只能順序存儲

              C) 棧具有記憶作用

              D)對棧的插入與刪除操作中,不需要改變棧底指針

              (2)數據的存儲結構是指______。

              A)存儲在外存中的數據 B)數據所占的存儲空間量

              C)數據在計算機中的順序存儲方式 D)數據的邏輯結構在計算機中的表示

              (3)對于長度為n的線性表,在最壞情況下,下列各排序法所對應的比較次數中正確的是______。

              A)冒泡排序為n/2 B)冒泡排序為n

              C)快速排序為n D)快速排序為n(n-1)/2

              (4)對長度為n的線性表進行順序查找,在最壞情況下所需要的比較次數為______。

              A)log2n B)n/2 C)n D)n+1

              (5)下列對于線性鏈表的描述中正確的是______。

              A) 存儲空間不一定是連續,且各元素的存儲順序是任意的

              B) 存儲空間不一定是連續,且前件元素一定存儲在后件元素的前面

              C) 存儲空間必須連續,且前件元素一定存儲在后件元素的前面

              D) 存儲空間必須連續,且各元素的存儲順序是任意的

              (6)下列對于軟件測試的描述中正確的是______。

              A) 軟件測試的目的是證明程序是否正確

              B) 軟件測試的目的是使程序運行結果正確

              C) 軟件測試的目的是盡可能多地發現程序中的錯誤

              D) 軟件測試的目的是使程序符合結構化原則

              (7)為了使模塊盡可能獨立,要求______。

              A) 模塊的內聚程度要盡量高,且各模塊間的耦合程度要盡量強

              B) 模塊的內聚程度要盡量高,且各模塊間的耦合程度要盡量弱

              C) 模塊的內聚程度要盡量低,且各模塊間的耦合程度要盡量弱

              D) 模塊的內聚程度要盡量低,且各模塊間的耦合程度要盡量強

              (8)下列描述中正確的是______。

              A)程序就是軟件 B)軟件開發不受計算機系統的限制

              C)軟件既是邏輯實體,又是物理實體

              D)軟件是程序、數據與相關文檔的集合

              (9)數據獨立性是數據庫技術的重要特點之一。所謂數據獨立性是指______。

              A)數據與程序獨立存放

              B)不同的數據被存放在不同的文件中

              C)不同的數據只能被對應的應用程序所使用

              D)以上三種說法都不對

              (10)用樹形結構表示實體之間聯系的模型是______。

              A)關系模型 B)網狀模型 C)層次模型 D)以上三個都是

              (11)在窗體(名稱為Form1)上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫一個事件過程。程序運行后,如果在文本框中輸入一個字符,則把命令按鈕的標題設置為“計算機等級考試”。以下能實現上述操作的事件過程是______。

              A) Private Sub Text1_Change()

              Command1.Caption = "計算機等級考試"

              End Sub

              B) Private Sub Command1_ Click ()

              Caption = "計算機等級考試"

              End Sub

              C) Private Sub Form1_ Click ()

              Text1.Caption = "計算機等級考試"

              End Sub

              D) Private Sub Command1_ Click ()

              Text1.Text = "計算機等級考試"

              End Sub

              (12)設a=5,b=4,c=3,d=2下列表達式的值是______。

              3 > 2 * b Or a = c And b <> c Or c > d

              A)1 B)True C) False D)2

              (13)設a = "MicrosoftVisualBasic" ,則以下使變量b的值為“VisualBasic”的語句是______。

              A) b = Left(a, 10) B) b = Mid(a, 10)

              C) b = Right(a, 10) D) b = Mid(a, 11, 10)

              (14)假定有如下的窗體事件過程:

              Private Sub Form_Click()

              a$ = "Microsoft Visual Basic"

              b$ = Right(a$, 5)

              c$ = Mid(a$, 1, 9)

              MsgBox a$, 34, b$, c$, 5

              End Sub

              程序運行后,單擊窗體,則在彈出的信息框的標題欄中顯示的信息是______。

              A) Microsoft Visual B) Microsoft

              C) Basic D)5

              (15)設a = "a",b = "b",c = "c",d = "d",執行語句x=IIf((ad),”A”,”B”)后,x的值為 ______。

              A)”a” B)”b” C)”B” D)”A”

              (16)為了使命令按鈕(名稱為Command1)右移200,應使用的語句是______。

              A) Command1.Move -200

              B) Command1.Move 200

              C) Command1.Left = Command1.Left + 200

              D) Command1.Left = Command1.Left - 200

              (17)在窗體上畫一個文本框,然后編寫如下事件過程:

              Private Sub Form_Click()

              x = InputBox("請輸入一個整數")

              Print x + Text1.Text

              End Sub

              程序運行時,在文本框中輸入456,然后單擊窗體,在輸入對話框中輸入123,單擊“確定”按鈕后,在窗體上顯示的內容為______。

              A) 123 B)456 C) 479 D) 123456

              (18)在窗體上畫一個文本框和一個計時器控件,名稱分別為Text1和Timer1,在屬性窗口中把計時器的Interval屬性設置為1000,Enabled屬性設置為False。程序運行后,如果單擊命令按鈕,則每隔一秒鐘在文本框中顯示一次當前的時間。以下是實現上述操作的程序:

              Private Sub Command1_Click()

              Timer1.______

              End Sub

              Private Sub Timer1_Timer()

              Text1.Text = Time

              End Sub

              在下劃線處應填入的內容是______。

              A) Enabled = True B) Enabled = False

              C) Visible = True D) Visible = False

              (19)假定在圖片框Picture1中裝入了一個圖形,為了清除該圖形(不刪除圖片框),應采用的正確方法是______。

              A)選擇圖片框,然后按Del鍵

              B)執行語句Picture1.Picture = LoadPicture ("")

              C)執行語句Picture1.Picture =""

              D)選擇圖片框,在屬性窗口中選擇Picture屬性條,然后按回車鍵

              (20)在窗體上畫一個名稱為List1的列表框,一個名稱為Label1的標簽,列表框中顯示若干個項目。當單擊列表框中的某個項目時,在標簽中顯示被選中項目的名稱。下列能正確實現上述操作的程序是:_____。

              A)Private Sub List1_Click()

              Label1.Caption = List1.ListIndex

              End Sub

              B)Private Sub List1_Click()

              Label1.Name=List1.ListIndex

              End Sub

              C) Private Sub List1_Click()

              Label1.Name=List1.Text

              End Sub

              D) Private Sub List1_Click()

              Label1.Caption =List1.Text

              End Sub

              (21)在窗體上畫一個命令按鈕,其名稱為Command1,然后編寫如下事件過程:

              Private Sub Command1_Click()

              Dim i As Integer, x As Integer

              For i = 1 To 6

              If i = 1 Then x = i

              If i <= 4 Then

              x = x + 1

              Else

              x = x + 2

              End If

              Next i

              Print x

              End Sub

              程序運行后,單擊命令按鈕,其輸出結果為______。

              A)9 B)6 C)12 D)15

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

              Private Sub Command1_Click()

              c = “ABCD”

              For n= 1 To 4

              Print ______

              Next

              End Sub

              程序運行后,單擊命令按鈕,要求在窗體上顯示如下內容

              D

              CD

              BCD

              ABCD

              則在______處填入的內容為。

              A) Left(c,n) B) Right(c,n) C) Mid(c,n,1) D) Mid(c,n,n)

              (23)執行以下程序段

              Dim i As Integer, x As Integer

              x = 0

              For i = 20 To 1 Step -2

              x = x + i \ 5

              Next

              Print x

              后,x的值為______。

              A)16 B)17 C)18 D)19

              (24)在Visual Basic工程中,可以作為“啟動對象”的程序是______。

              A)任何窗體或標準模塊 B)任何窗體或過程

              C)Sub Main過程或其他任何模塊 D) Sub Main過程或任何窗體

              (25)假定建立了一個名為Command1的命令按鈕數組,則以下說法中錯誤的是______。

              A)數組中每個命令按鈕的名稱(Name屬性)均為Command1

              B)數組中每個命令按鈕的標題(Caption屬性)都一樣

              C)數組中所有命令按鈕可以使用同一個事件過程

              D)用名稱Command1(下標)可以訪問數組中的每個命令按鈕

              (26)把窗體的KeyPreview屬性設置為True,然后編寫如下事件過程

              Private Sub Form_KeyPress(KeyAscii As Integer)

              Dim ch As String

              ch = Chr(KeyAscii)

              KeyAscii = Asc(UCase(ch))

              Print Chr(KeyAscii + 2)

              End Sub

              程序運行后,按鍵盤上的“A”鍵,則在窗體上顯示的內容是______。

              A)A B) B C)C D)D

              (27)在窗體上畫一個命令按鈕和一個文本框,名稱分別為Command1和Text1,然后編寫如下程序:

              Private Sub Command1_Click()

              a=InputBox(“請輸入日期(1~31)”)

              t=”旅游景點:” _

              & IIf ( a > 0 And a <= 10,”長城”,””) _

              & IIf ( a >10 And a <= 20,”故宮”,””) _

              & IIf ( a > 20 And a <= 31,”頤和園”,””)

              Text1.Text = t

              End Sub

              程序運行后,如果從鍵盤上輸入16,則在文本框顯示的內容是______。

              A) 旅游景點:長城故宮 B) 旅游景點:長城頤和園

              C) 旅游景點:頤和園 D) 旅游景點:故宮

              (28)在窗體上畫一個名稱為Label1的標簽,然后編寫如下事件過程:

              Private Sub Form_Click()

              Dim arr(10, 10) As Integer

              Dim i As Integer, j As Integer

              For i = 2 To 4

              For j = 2 To 4

              arr(i, j) = i * j

              Next j

              Next i

              Label1.Caption = Str(arr(2, 2) + arr(3, 3))

              End Sub

              程序運行后,單擊窗體,在標簽中顯示的內容是______。

              A)12 B)13 C)14 D)15

              (29)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下通用過程和命令按鈕的事件過程:

              Private Function fun(ByVal m As Integer)


            更多相關試題推薦:

            1.2016下半年計算機二級VB上機考試答題攻略

            2.2016年計算機二級VB考試沖刺題(含答案)

            3.2016年計算機二級考試vb題庫及答案

            4.2016計算機二級考試vb復習試題及答案

            5.2016最新計算機二級vb考試試題及答案

            6.2016年計算機二級考試vb試題

            7.vb計算機二級考試試題

            8.2016年計算機二級《VB》備考練習題及答案

            9.2016年全國計算機二級vb考試題庫及答案

            10.2016年計算機二級vb試題庫

              If m Mod 2 = 0 Then

              fun = 2

              Else

              fun = 1

              End If

              End Function

              Private Sub Command1_Click()

              Dim i As Integer, s As Integer

              s = 0

              For i = 1 To 5

              s = s + fun(i)

              Next

              Print s

              End Sub

              程序運行后,單擊命令按鈕,在窗體上顯示的是______。

              A)6 B)7 C)8 D)9

              (30)閱讀程序:

              Option Base 1

              Dim arr() As Integer

              Private Sub Form_Click()

              Dim i As Integer, j As Integer

              ReDim arr(3, 2)

              For i = 1 To 3

              For j = 1 To 2

              arr(i, j) = i * 2 + j

              Next j

              Next i

              ReDim Preserve arr(3, 4)

              For j = 3 To 4

              arr(3, j) = j + 9

              Next j

              Print arr(3, 2) + arr(3, 4)

              End Sub

              程序運行后,單擊窗體,輸入結果為______。

              A)21 B)13 C)8 D)25

              (31)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序:

              Option Base 1

              Private Sub Command1_Click()

              Dim c As Integer, d As Integer

              d = 0

              c = 6

              x = Array(2, 4, 6, 8, 10, 12)

              For i = 1 To 6

              If x(i) > c Then

              d = d + x(i)

              c = x(i)

              Else

              d = d - c

              End If

              Next

              Print d

              End Sub

              程序運行后,如果單擊命令按鈕,則在窗體上輸出的內容為______。

              A) 10 B) 16 C) 12 D) 20

              (32)設有如下程序:

              Private Sub Command1_Click()

              Dim c As Integer, d As Integer

              c = 4

              d = InputBox("請輸入一個整數")

              Do While d > 0

              If d > c Then

              c = c + 1

              End If

              d = InputBox("請輸入一個整數")

              Loop

              Print c + d

              End Sub

              程序運行后,單擊命令按鈕,如果在輸入對話框中依次輸入1、2、3、4、5、6、7、8、9、0,則輸出結果是______。

              A)12 B)11 C)10 D)9

              (33)在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框,在文本框中輸入以下字符串:Microsoft Visual Basic Programming

              然后編寫如下事件過程:

              Private Sub Command1_Click()

              Open "d:\temp\outf.txt" For Output As #1

              For i = 1 To Len(Text1.Text)

              c = Mid(Text1.Text, i, 1)

              If c >= "A" And c <= "Z" Then

              Print #1, LCase(c)

              End If

              Next i

              Close

              End Sub

              程序運行后,單擊命令按鈕,文件outf.txt中的內容是______。

              A)MVBP B)mvbp C)M D)m

              V v

              B b

              P p

              (34)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序:

              Dim SW As Boolean

              Function func(X As Integer) As Integer

              If X < 20 Then

              Y = X

              Else

              Y = 20 + X

              End If

              func = Y

              End Function

              Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

              SW = False

              End Sub

              Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

              SW = True

              End Sub

              Private Sub Command1_Click()

              Dim intNum As Integer

              intNum = InputBox("")

              If SW Then

              Print func(intNum)

              End If

              End Sub

              程序運行后,單擊命令按鈕,將顯示一個輸入對話框,如果在輸入對話框中輸入25,則程序的執行結果為______。

              A)輸出0 B)輸出25 C)輸出45 D)無任何輸出

              (35)設有如下通用過程:

              Public Sub Fun(a() As Integer, x As Integer)

              For i = 1 To 5

              x = x + a(i)

              Next

              End Sub

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

              Private Sub Command1_Click()

              Dim arr(5) As Integer, n As Integer

              For i = 1 To 5

              arr(i) = i + i

              Next

              Fun arr, n

              Text1.Text = Str(n)

              End Sub

              程序運行后,單擊命令按鈕,則在文本框中顯示的內容是______。

              A)30 B)25 C)20 D)15

              二、填空題(每空2分,共30分)

              請將每空的正確答案寫在答題卡【1】~【15】序號的橫線上,答在試卷上不得分。

              (1)某二叉樹中度為2的結點有18個,則該二叉樹中有 【1】 個葉子結點。

              (2)在面向對象方法中,類的實例稱為 【2】 。

              (3)診斷和改正程序中錯誤的工作通常稱為 【3】 。

              (4)在關系數據庫中,把數據表示成二維表,每一個二維表稱為 【4】 。

              (5)問題處理方案的正確而完整的描述稱為 【5】 。

              (6)以下語句輸出結果是 【6】 。

              Print Int(12345.6789 * 100 + 0.5) / 100

              (7)在窗體上畫一個文本框和一個圖片框,然后編寫如下兩個事件過程:

              Private Sub Form_Click()

              Text1.Text = "VB程序設計"

              End Sub

              Private Sub Text1_Change()

              Picture1.Print "VB Programming"

              End Sub

              程序運行后,單擊窗體,則在文本框中顯示的內容是 【7】 ,而在圖片框中顯示的內容是 【8】 。

              (8)閱讀下面的程序:

              Private Sub Form_Click()

              Dim Check As Boolean, Counter As Integer

              Check = True

              Counter = 5

              Do

              Do While Counter < 20

              Counter = Counter + 1

              If Counter = 10 Then

              Check = False

              Exit Do

              End If

              Loop

              Loop Until Check = False

              Print Counter

              End Sub

              程序運行后,單擊窗體,輸出結果為 【9】 。

              (9)設有如下程序:

              Private Sub Form_Click()

              Dim n As Integer, s As Integer

              n = 8

              s = 0

              Do

              s = s + n

              n = n - 1

              Loop While n > 0

              Print s

              End Sub

              以上程序的功能是 【10】 。程序運行后,單擊窗體,輸出結果為 【11】 。

              (10)設有如下程序:

              Option Base 1

              Private Sub Command1_Click()

              Dim arr1

              Dim Min As Integer, i As Integer

              arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43)

              Min = 【12】

              For i = 2 To 8

              If arr1(i) < Min Then 【13】

              Next

              Print "最小值是:"; Min

              End Sub

              以上程序的功能是:用Array函數建立一個含有8個元素的數組,然后查找并輸出該數組中各元素的最小值。請填空。

              (11)在名稱為Form1的窗體上畫一個文本框,其名稱為Text1,在屬性窗口中把該文本框的MultiLine屬性設置為True,然后編寫如下的事件過程:

              Private Sub Form_Click()

              Open "d:\test\smtext1.txt" For Input As #1

              Do While Not 【14】

              Line Input #1, aspect$

              whole$ = whole$ + aspect$ + Chr$(13) + Chr$(10)

              Loop

              Text1.Text = whole$

              Close #1

              Open "d:\test\smtext2.txt" For Output As #1

              Print #1, 【15】

              Close #1

              End Sub

              上述程序的功能是,把磁盤文件smtext1.txt的內容讀到內存并在文本框中顯示出來,然后把該文本框中的內容存入磁盤文件smtext2.txt。請填空。

              【參考答案】

              選擇題:

              1---5 BDDCA

              6---10 CBDDC

              11--15 ABBCD

              16--20 CDABD

              21--25 ABCDB

              26--30 CDBBA

              31--35 CDDDA

              填空題:

              【1】19

              【2】 對象

              【3】 程序調試

              【4】 關系

              【5】 算法

              【6】12345.68

              【7】VB程序設計

              【8】 VB Programming

              【9】 10

              【10】 求1-8的和

              【11】36

              【12】 arr1(1)

              【13】min=arr1(i)

              【14】 EOF(1)

              【15】text1.text(或whole$)


            更多相關試題推薦:

            1.2016下半年計算機二級VB上機考試答題攻略

            2.2016年計算機二級VB考試沖刺題(含答案)

            3.2016年計算機二級考試vb題庫及答案

            4.2016計算機二級考試vb復習試題及答案

            5.2016最新計算機二級vb考試試題及答案

            6.2016年計算機二級考試vb試題

            7.vb計算機二級考試試題

            8.2016年計算機二級《VB》備考練習題及答案

            9.2016年全國計算機二級vb考試題庫及答案

            10.2016年計算機二級vb試題庫