2021年9月全國計算機等級考試二級VB筆試試卷(含參考答案)

1、2021年9月全國計算機等級考試二級VB筆試試卷(含參考答案)2005年9月齊國盤算機品級測驗2級VB口試試卷（露參考問案）一、取舍題（每一小題2分，共70分）（1）以下道述中準確的是cA）步伐計劃便是體例步伐B）步伐的測試必需由步伐員本人往實現(xiàn)C）步伐經(jīng)調試改錯后借應舉行再測試D）步伐經(jīng)調試改錯后沒有必舉行再測試（2）以下數(shù)據(jù)布局中，能用2分法舉行查尋的是AA）逆序存儲的有序線性表B）線性鏈表C）2叉鏈表D）有序線性鏈表（3）以下閉于棧的形容準確的是CA）正在棧中只能拔出元素而沒有能刪除了元素B）正在棧中只能刪除了元素而沒有能拔出元素C）棧是特別的線性表，只能正在一端拔出或者刪除了元素D）棧

2、是特別的線性表，只能正在一端拔出元素，而正在另外一端刪除了元素（4）以下道述中準確的是DA）一個邏輯數(shù)據(jù)布局只能有一種存儲布局B）數(shù)據(jù)的邏輯布局屬于線性布局，存儲布局屬于非線性布局C）一個邏輯數(shù)據(jù)布局能夠有多種存儲布局，且各類存儲布局沒有影響數(shù)據(jù)處置的效力D）一個邏輯數(shù)據(jù)布局能夠有多種存儲布局，且各類存儲布局影響數(shù)據(jù)處置的效力（5）以下形容中準確的是CA）硬件工程只是辦理硬件名目的辦理成績B）硬件工程次要辦理硬件產物的死產率成績C）硬件工程的次要頭腦是夸大正在硬件開辟歷程中必要使用工程化本則D）硬件工程只是辦理硬件開辟中的手藝成績（6）正在硬件計劃中，沒有屬于歷程計劃東西的是DA）PDL(歷程

3、計劃言語) B）PAD圖C）N-S圖D）DFD圖（7）以下道述中準確的是AA）硬件托付利用后借必要舉行保護B）硬件一旦托付利用便沒有必要再舉行保護C）硬件托付利用后其死命周期便停止D）硬件保護是指建復步伐中被損壞的指令（8）數(shù)據(jù)庫計劃的基本宗旨是要辦理AA）數(shù)據(jù)同享成績B）數(shù)據(jù)保險成績C）年夜量數(shù)據(jù)存儲成績 D）簡化數(shù)據(jù)保護（9）設有以下閉系表:BR S TA B C A B C A B C1 123 1 3 1 1 22 23 2 2 33 1 3則以下操縱中準確的是A）TRS B）TRS C）TRS D）TR/S（10）數(shù)據(jù)庫體系的中心是BA）數(shù)據(jù)模子B）數(shù)據(jù)庫辦理體系C）數(shù)據(jù)庫D）數(shù)據(jù)庫

4、辦理員（11）假設一個Visual Basic使用步伐由一個窗體模塊以及一個尺度模塊形成。為了保留該使用步伐，下列準確的操縱是BA）只保留窗體模塊文件B）分手保留窗體模塊、尺度模塊以及工程文件C）只保留窗體模塊以及尺度模塊文件D）只保留工程文件（13）下列道述中同伴的是CA）挨開一個工程文件時，體系主動拆進取該工程無關的窗體、尺度模塊等文件B）當步伐運轉時，單擊一個窗體，則觸收該窗體的DblClick事務C）Visual Basic使用步伐只能以注釋圓式實行D）事務能夠由用戶引起，也能夠由體系引起（14）設a=2, b=3, c=4, d=5, 以下抒發(fā)式的值是DNot aA）-1 B）1 C

5、）True D）False（15）設a = 5，b = 10，則實行Cc = Int(b - a) * Rnd + a) + 1后，c值的局限為A）510 B）69 C）610 D）59（16）正在窗體上繪一個下令按鈕，稱號為Command1，而后編寫以下事務歷程：C Private Sub Command1_Click()a$ = software and hardwareb$ = Right(a$, 8)c$ = Mid(a$, 1, 8)MsgBox a$, , b$, c$, 1End Sub運轉步伐，單擊下令按鈕，則正在彈出的疑息框的題目欄中隱示的是A）software and ha

6、rdware B）software C）hardware D）1（17）正在窗體上繪一個下令按鈕以及一個文本框，其稱號分手為Command1以及Text1，把文本框的Text屬性配置為空缺，而后編寫以下事務歷程：APrivate Sub Command1_Click()a = InputBox(Enter an integer)b = InputBox(Enter an integer)Text1.Text = b + aEnd Sub步伐運轉后，單擊下令按鈕，假如正在輸出對于話框平分別輸出8以及10，則文本框中隱示的內容是A）108 B）18 C）810 D）墮落（18）正在窗體上繪兩個文本

7、框，其稱號分手為Text1以及Text2，而后編寫以下步伐：BPrivate Sub Form_Load()ShowText1.Text = Text2.Text = Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub步伐運轉后，假如正在文本框Text1中輸出BeijingChina，則正在文本框Text2中隱示的內容是A）BeijingChina B）China C）Beijing D）BeijingC（19）正在窗體上繪一個列表框以及一個下令按鈕，其稱號分手為List1以

8、及Command1，而后編寫以下事務歷程：BPrivate Sub Form_Load()List1.AddItem Item 1List1.AddItem Item 2List1.AddItem Item 3End SubPrivate Sub Command1_Click()List1.List(List1.ListCount) = AAAAEnd Sub步伐運轉后，單擊下令按鈕，其了局為A）把字符串“AAAA”加減到列表框中，但地位沒有能斷定B）把字符串“AAAA”加減到列表框的最初（即“Item 3”的前面）C）把列表框華夏有的最初一項改成“AAAA”D）把字符串“AAAA”拔出到列表

9、框的最后面（即“Item 1”的后面）（20）假設有以下事務歷程：APrivate Sub Form_Click()Dim x As Integer, n As Integerx = 1n = 0Do While x x = x * 3n = n + 1LoopPrint x, nEnd Sub步伐運轉后，單擊窗體，輸入了局是A）81 4 B）56 3 C）28 1 D）243 5（21）有以下步伐：DPrivate Sub Form_Click()Dim Check, CounterCheck = TrueCounter = 0DoDo While Counter Counter = Cou

10、nter + 1If Counter = 10 ThenCheck = FalseExit DoEnd IfLoopLoop Until Check = FalsePrint Counter, CheckEnd Sub步伐運轉后，單擊窗體，輸入了局為A）15 0 B）20 -1 C）10 True D）10 False（22）有以下步伐：APrivate Sub Form_Click()Dim i As Integer, sum As Integersum = 0For i = 2 To 10If i Mod 2 sum = sum + iEnd IfNext iPrint sumEnd Su

11、b步伐運轉后，單擊窗體，輸入了局為A）12 B）30 C）24 D）18（23）正在窗體上繪一個稱號為Text1的文本框以及一個稱號為Command1的下令按鈕，而后編寫以下事務歷程：APrivate Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub步伐運轉后，單擊下令按鈕，

12、正在文本框中隱示的值是A）12 B）13 C）14 D）15（24）正在窗體上繪一個下令按鈕，其稱號為Command1，而后編寫以下事務歷程D Private Sub Command1_Click()Dim a1(4, 4), a2(4, 4)For i = 1 To 4For j = 1 To 4a1(i, j) = i + ja2(i, j) = a1(i, j) + i + jNext jNext iPrint a1(3, 3); a2(3, 3)End Sub步伐運轉后，單擊下令按鈕，正在窗體上輸入的是A）6 6 B）10 5 C）7 21 D）6 12（25）有以下步伐：Option

13、 Base 1Private Sub Form_Click()Dim arr, SumSum = 0arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)For i = 1 To 10If arr(i) / 3 = arr(i) 3 ThenSum = Sum + arr(i)End IfNext iPrint SumEnd Sub步伐運轉后，單擊窗體，輸入了局為CA）25 B）26 C）27 D）28（26）正在窗體上繪一個下令按鈕，而后編寫以下事務歷程：APrivate Sub Command1_Click()Dim a(5) As StringFor

14、 i = 1 To 5a(i) = Chr(Asc(A) + (i - 1)Next iFor Each b In aPrint b;NextEnd Sub步伐運轉后，單擊下令按鈕，輸入了局是A）ABCDE B）1 2 3 4 5C）abcde D）墮落疑息（27）下列閉于函數(shù)歷程的道述中，準確的是DA）假如沒有指明函數(shù)歷程參數(shù)的范例，則該參數(shù)出無數(shù)據(jù)范例B）函數(shù)歷程的前往值能夠有多個C）當數(shù)組做為函數(shù)歷程的參數(shù)時，既能以傳值圓式傳送，也能以援用圓式傳送D）函數(shù)歷程形參的范例取函數(shù)前往值的范例出無關系（28）函數(shù)歷程F1的功效是：假如參數(shù)b為偶數(shù)，則前往值為1，可則前往值為0。下列能準確真現(xiàn)上

15、述功效的代碼是BA）Function F1(b As Integer)If b Mod 2 = 0 ThenReturn 0ElseReturn 1End IfEnd FunctionB）Function F1(b As Integer)If b Mod 2 = 0 ThenF1 = 0ElseF1 = 1End IfEnd FunctionC）Function F1(b As Integer)If b Mod 2 = 0 ThenF1 = 1ElseF1 = 0End IfEnd FunctionD）Function F1(b As Integer)If b Mod 2 Return 0El

16、seReturn 1End IfEnd Function（29）下列閉于KeyPress事務歷程中參數(shù)KeyAscii的道述中準確的是A A）KeyAscii參數(shù)是所按鍵的ASCII碼B）KeyAscii參數(shù)的數(shù)據(jù)范例為字符串C）KeyAscii參數(shù)能夠省略D）KeyAscii參數(shù)是所按鍵上標注的字符（30）設窗體上有一個名為Text1的文本框，并編寫以下步伐：CPrivate Sub Form_Load()ShowText1.Text = Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer, _Shift As In

17、teger, X As Single, Y As Single)Print 步伐計劃End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Visual Basic;End Sub步伐運轉后，假如正在文本框中輸出字母“a”，而后單擊窗體，則正在窗體上隱示的內容是A）Visual Basic B）步伐計劃C）Visual Basic步伐計劃D）a步伐計劃（31）假設有下表所列的菜單布局：題目稱號條理隱示appear 1（主菜單）年夜圖標bigicon 2（子菜單）小圖標smallicon 2（子菜單

18、）請求步伐運轉后，假如單擊菜單項“年夜圖標”，則正在該菜單項前加減一個“?”。下列準確的事務歷程是CA）Private Sub bigicon_Click()bigicon.Checked = FalseEnd SubB）Private Sub bigicon_Click()Me. appear.bigicon.Checked = TrueEnd SubC）Private Sub bigicon_Click()bigicon.Checked = TrueEnd SubD）Private Sub bigicon_Click()appear.bigicon.Checked = TrueEnd Su

19、b（32）假設通用對于話框的稱號為CommonDialog1，下令按鈕的稱號為Command1，則單擊下令按鈕后，能使挨開的對于話框的題目為“New Title”的事務歷程是C A）Private Sub Command1_Click()CommonDialog1.DialogTitle = New TitleCommonDialog1.ShowPrinterEnd SubB）Private Sub Command1_Click()CommonDialog1.DialogTitle = New TitleCommonDialog1.ShowFontEnd SubC）Private Sub Co

20、mmand1_Click()CommonDialog1.DialogTitle = New TitleCommonDialog1.ShowOpenEnd SubD）Private Sub Command1_Click()CommonDialog1.DialogTitle = New TitleCommonDialog1.ShowColorEnd Sub（33）假如一個工程露有多個窗體及尺度模塊，則下列道述中同伴的是DA）任什么時候刻至多只要一個窗體是舉動窗體B）沒有能把尺度模塊配置為啟動模塊C）用Hide圓法只是埋沒一個窗體，沒有能從內存中渾除了該窗體D）假如工程中露有Sub Main歷程，則

21、步伐必定尾先實行該歷程（34）假設正在工程文件中有一個尺度模塊，個中界說了以下紀錄范例AType BooksName As String * 10TelNum As String * 20End Type請求當實行事務歷程Command1_Click時，正在逆敘文件Person.txt中寫進一筆記錄。以下可以實現(xiàn)該操縱的事務歷程是A）Private Sub Command1_Click()Dim B As BooksOpen c:Person.txt For Output As #1/doc/145f1168a98271fe910ef953.html =

22、InputBox(輸出姓名)B.TelNum = InputBox(輸出德律風號碼)Write #1, /doc/145f1168a98271fe910ef953.html, B.TelNumClose #1End SubB）Private Sub Command1_Click()Dim B As BooksOpen c:Person.txt For Input As #1/doc/145f1168a98271fe910ef953.html = InputBox(輸出姓名)B.TelNum = InputBox(輸出德

23、律風號碼)Print #1, /doc/145f1168a98271fe910ef953.html, B.TelNumClose #1End SubC）Private Sub Command1_Click()Dim B As BooksOpen c:Person.txt For Output As #1Name = InputBox(輸出姓名)TelNum = InputBox(輸出德律風號碼)Write #1, BClose #1End SubD）Private Sub Command1_Click()Dim B As BookOpen c:Person

24、.txt For Input As #1Name = InputBox(輸出姓名)TelNum = InputBox(輸出德律風號碼)Print #1, /doc/145f1168a98271fe910ef953.html, B.TelNumClose #1End Sub（35）名目列表框的Path屬性的做用是BA）隱示以后驅動器或者指定驅動器上的某名目下的文件名B）隱示以后驅動器或者指定驅動器上的名目布局C）隱示根名目下的文件名D）隱示指定途徑下的文件2、挖空題（每一空2分，共30分）請將每一空的準確問案寫正在問題卡【1】【15】序號的橫線上，問正在試卷

25、上沒有患上分。（1）數(shù)據(jù)辦理手藝收展歷程經(jīng)由野生辦理、文件體系以及數(shù)據(jù)庫體系3個階段，個中數(shù)據(jù)自力性最下的階段是（數(shù)據(jù)庫體系）。（2）算法龐大度次要包含光陰龐大度以及【空間】龐大度。（3）正在舉行模塊測試時，要為每一個被測試的模塊別的計劃兩類模塊：驅動模塊以及啟接模塊（樁模塊）。個中【驅動模塊】的做用是將測試數(shù)據(jù)傳遞給被測試的模塊，并隱示被測試模塊所發(fā)生的了局。（4）一棵2叉樹第6層（根結面為第一層）的結面數(shù)至多為【32】個。（5）數(shù)據(jù)布局分為邏輯布局以及存儲布局，輪回行列屬于【存儲】布局。（6）設有下列函數(shù)歷程：Function fun(m As Integer) As IntegerDim

26、 k As Integer, sum As Integersum = 0For k = m To 1 Step -2sum = sum + kNext kfun = sumEnd Function若正在步伐頂用語句s = fun(10) 挪用此函數(shù)，則s的值為【30】。（7）正在窗體上繪一個下令按鈕以及一個文本框，而后編寫下令按鈕的Click事務歷程。步伐運轉后，正在文本框中輸出一串英筆墨母（沒有分辨年夜小寫），單擊下令按鈕，步伐可尋出已正在文本框中輸出的其余一切英筆墨母，并以年夜寫圓式落序隱示到Text1中。比方，若正在Text1中輸出的是abDfdb，則單擊Command1按鈕后Text1

27、中隱示的字符串是ZYXWVUTSRQPONMLKJIHGEC。請挖空。Private Sub Command1_Click( )Dim str As String, s As String, c As Stringstr = UCase(Text1)s = c = ZWhile c = AIf InStr(str, c) = 0 Thens = 【s & c】End Ifc = Chr$(Asc(c) 【-1】)WendIf s Text1 = sEnd IfEnd Sub（8）正在n個活動員當選出恣意r團體列入競賽，有不少種沒有同的選法，選法的個數(shù)能夠用公式盤算。下圖窗體中3個文本框的稱號挨

28、次是Text1、Text2、Text3。步伐運轉時正在Text1、Text2平分別輸出n以及r的值，單擊Command1按鈕便可供出選法的個數(shù)，并隱示正在Text3文本框中(睹下圖)。請挖空。Private Sub Command1_Click( )Dim r As Integer, n As Integern = Text1r = Text2Text3 = fun(n) / fun(【n - r】 ) / fun(r)End SubFunction fun(n As Integer) as longDim t As Long【t = 1】For k = 1 To nt = t * kNextfun = tEnd Function（9）下列是一個競賽評分步伐。正在窗體上創(chuàng)建一個名為Text1的文本框數(shù)組，而后繪一個名為Text2的文本框以及名為Command1的下令按鈕。運轉時正在文本框數(shù)組中輸出7個分數(shù)，單擊“盤算患上分”下令按鈕，則最初患上分隱示正在Text2文本框中（往失落一個最下分以及一個最低分后的仄均分即為最初患上分），如圖所示。請挖空。Private Sub C