|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
新版全國計算機二級VB選擇題第1套 |
1.下列關于算法復雜度敘述正確的是 A.最壞情況下的時間復雜度一定高于平均情況的時間復雜度 B.時間復雜度與所用的計算工具無關 C.對同一個問題，采用不同的算法，則它們的時間復雜度是相同的 D.時間復雜度與采用的算法描述語言有關 2.設有棧S和隊列Q，初始狀態(tài)均為空。首先依次將A,B,C,D,E,F入棧，然后從棧中退出三個元素依次入隊，再將X,Y,Z入棧后，將棧中所有元素退出并依次入隊，最后將隊列中所有元素退出，則退隊元素的順序為 A.DEFXYZABC B.DEFXYZABC C.FEDXYZCBA D.DEFZYXABC 3.下列敘述中正確的是 A.有兩個指針域的鏈表稱為二叉鏈表 B.循環(huán)鏈表是循環(huán)隊列的鏈式存儲結構 C.帶鏈的棧有棧頂指針和棧底指針，因此又稱為雙重鏈表 D.結點中具有多個指針域的鏈表稱為多重鏈表 4.某二叉樹共有845個結點，其中葉子結點有45個，則度為1的結點數(shù)為 A.400 B.754 C.756 D.不確定 5.軟件需求分析階段的主要任務是 A.確定軟件開發(fā)方法 B.確定軟件開發(fā)工具 C.確定軟件開發(fā)計劃 D.確定軟件系統(tǒng)的功能 6.下面對軟件測試描述錯誤的是 A.嚴格執(zhí)行測試計劃，排除測試的隨意性 B.隨機地選取測試數(shù)據(jù) C.隨機地選取測試數(shù)據(jù) D.軟件測試是保證軟件質量的重要手段 7.結構化程序的三種基本控制結構是 A.順序、選擇和重復（循環(huán)） B.過程、子程序和分程序 C.順序、選擇和調用 D.調用、返回和轉移 8.數(shù)據(jù)庫中對概念模式內容進行說明的語言是 A.數(shù)據(jù)定義語言 B.數(shù)據(jù)操縱語言 C.數(shù)據(jù)控制語言 D.數(shù)據(jù)宿主型語言 9. 某個工廠有若干個倉庫，每個倉庫存放有不同的零件，相同零件可能放在不同的倉庫中。則實體倉庫和零件間的聯(lián)系是 A.多對多 B.一對多 C.多對一 D.一對一 10. A.交 B.差 C.并 D.選擇 11.表達式 5 * Sqr(25) + Sgn(4 ^ 4) 的值是 A.29 B.25 C.26 D.36 12.無論X取何值，均能成立的表達式是 A. Int(X) >= Abs(X) B. Int(X) = Abs(X) C. Int(X) <= Abs(X) D.Int(X) <> Abs(X) 13. 要求在窗體中定義一個變量x，在本窗體所有過程中都可以訪問它，而在其他模塊中不能訪問，則該變量的定義是 A.在本窗體的某個過程中寫語句：Dim x B.在本窗體所有過程之前寫語句：Dim x C.在本窗體所有過程之前寫語句：Public x D.在本窗體的所有過程中寫語句：Dim x 14.以下敘述中錯誤的是 A.對象具有屬性、方法等成員 B.對象可以識別預先定義的事件 C.一個對象中包含數(shù)據(jù)及其對這些數(shù)據(jù)的相關操作 D. 對象的屬性值一經(jīng)初始化，則不能再改變 15.以下敘述中正確的是 A.影響窗體上某個文本框的Tab順序的屬性是TabStop B.語句Me.Text = "Visual Basic"用于設置當前窗口的標題信息 C.用于獲取文本框中當前被選中文本的屬性為SelText D. 要獲取水平滾動條中當前滾動塊的位置應使用其Position屬性 16.下面關于組合框Cb1的敘述中正確的是 A.程序運行時，列表項可以多選 B.鼠標單擊一個列表項后，Cb1.Text 的值等于 Cb1.List(Cb1.ListIndex)的值 C.利用Selected屬性可以判斷哪個列表項被選中了 D.組合框不響應Change事件 17.下面關于組合框Cb1的敘述中正確的是 A.程序運行時，列表項可以多選 B.鼠標單擊一個列表項后，Cb1.Text 的值等于 Cb1.List(Cb1.ListIndex)的值 C.利用Selected屬性可以判斷哪個列表項被選中了 D.組合框不響應Change事件 18.在列表框或組合框中，能夠表示當前被選中列表項序號的是 A.ListIndex B.Index C.TopIndex D.List 19.要在程序運行過程中把Command1按鈕的標題修改為"按鈕"，正確的做法是 A.在屬性窗口中把Command1按鈕的Caption屬性改為“按鈕” B.在程序中執(zhí)行語句：Command1.Caption = "按鈕" C.在屬性窗口中把Command1按鈕的Text屬性改為“按鈕” D.在程序中執(zhí)行語句：Command1.Text = "按鈕" 20.文件列表框中用于設置或返回所選文件路徑和文件名的屬性是 A. File B.FilePath C.Path D.FileName 21.在窗體上畫2個名稱分別為Text1和Text2的文本框，然后編寫如下事件過程： Private Sub Form_Load() Show Text1.Text = "ABCDEF" Text2.SetFocus End Sub Private Sub Text1_GotFocus() Text1.SelStart = 2 Text1.SelLength = 3 End Sub 運行程序，單擊Text1，該文本框中的內容為 A.顯示ABCDEF，且BCD被選中 B.顯示ABCDEF，且CDE被選中 C.顯示BCD D.顯示CDE 22.下面關于框架控件的敘述中正確的是 A.框架響應Click事件 B.框架可以接受焦點 C.框架的標題是字符串，放在Text屬性中 D.可以在框架中輸入文本 23.通過語句X = InputBox("輸入數(shù)據(jù)", "示例", "0")對變體類型的變量X輸入數(shù)據(jù)，程序運行后，如果在對話框的輸入?yún)^(qū)中輸入數(shù)值100并按回車鍵，則下列敘述中正確的是 A. 變量X的值是字符串"0" B.在InputBox對話框標題欄中顯示的是“輸入數(shù)據(jù)” C.輸入對話框的輸入?yún)^(qū)中的初始默認值為數(shù)值0 D.變量X的值是字符串"100" 24.下面說法中錯誤的是 A.使用ReDim語句可以改變數(shù)組的維數(shù) B.使用ReDim語句可以改變數(shù)組的類型 C.使用ReDim語句可以改變數(shù)組的每一維的大小 D.ReDim語句可以使原數(shù)組中的內容被清除 25.若程序中有語句：y = proc(6)，則proc 應該是 A.一個Function過程的名稱 B.一個Sub過程的名稱 C.一個事件過程的名稱 D.既可能是一個Function過程的名稱，也可能是一個Sub過程的名稱 26.下列說法中正確的是 A. 任何情況下都可以用標準工具欄的“菜單編輯器”按鈕打開菜單編輯器 B. 任何情況下都可以用標準工具欄的“菜單編輯器”按鈕打開菜單編輯器 C.任何情況下都可以用"工具"菜單中的“菜單編輯器”命令打開菜單編輯器 D.只有當某個窗體為當前活動窗體時，才能打開菜單編輯器 27.下面關于菜單的敘述中正確的是 A.彈出式菜單和下拉式菜單都可用菜單編輯器編輯 B.彈出式菜單不能有子菜單 C.菜單項可以響應Click事件和DblClick事件 D.有子菜單的菜單項不響應Click事件 28.為了向c盤根目錄下的Stud.txt文件中添加數(shù)據(jù)而不破壞其原有數(shù)據(jù)，下列正確打開該文件的語句是 A.Open "c:\Stud.txt" For Output As #1 B. Open "c:\Stud.txt" For Append As #1 C.Open c:\Stud.txt For Output As #1 D.Open c:\Stud.txt For Append As #1 29.如果希望向一個順序文件寫入數(shù)據(jù)，但又要保留文件中的原有內容，應采取的文件打開方式是 A.Append B.Output C.Random D.Input 30.設有如下事件過程： Private Sub Command1_Click() ch = "ABCDEFG" n = Len(ch) k = 1 Do Print Mid(ch, k, 1); Mid(ch, n, 1); k = k + 1 n = n - 1 Loop Until k > n End Sub 運行此過程所產(chǎn)生的輸出是 A.AGBFCEDD B.AGBFCED C.GFEDCBA D.GAFBECD 31. A.把case x < 0改為 case Is < 0 B.把Case 1, 2, 3, 4, 5 改為 Case 0 C.把 case 0 改為 case x = 0 D.把Case Else改為Case Is >= 6 32.有如下事件過程： Private Sub Form_Click() Dim a As Long, b As Long Dim sum As Long Dim x As Integer a = 1 b = 1 For x = 1 To 11 Step 2 a = b * x ________ s = s + a sum = sum + s Next x Print sum End Sub 以上程序的功能是，計算 1!+(1!+3!)+(1!+3!+5!)+…+(1!+3!+5!+…+11!) 的值并輸出。程序不完整，在________處應填入的內容是 A. b = a * (x + 1) B.a = a * (x – 1) C.a = a * (x + 1) D.b = a * x 33.下面程序的功能是找出這樣一個三位整數(shù)：它等于每位數(shù)字的階乘之和，例如145就是這樣的數(shù)（即145 = 1！+ 4！+ 5！） Private Sub Command1_Click() Dim x As Integer, i As Integer, j As Integer, k As Integer For i = 1 To 9 For j = 0 To 9 For k = 0 To 9 a = ___________________ If a = fact(i) + fact(j) + fact(k) Then Print a End If Next k Next j Next i End Sub Function fact(n As Integer) As Long Dim x As Long x = 1 For k = 1 To n x = x * k Next k fact = x End Function 程序不完整，在橫線上應填寫的是 A.i * 100 + j * 10 + k B.i * 1000 + j * 100 + k * 10 C.i * 10 + j * 10 + k * 10 D.fact(0) + fact(1) + fact(9) 34.有如下通用過程： Private Sub St(ByVal strX As String, strY As String) Dim Ts As String i = Len(strX) Do While i >= 1 Ts = Ts + Mid(strX, i, 1) i = i - 1 Loop strY = Ts End Sub 在窗體上畫一個命令按鈕，其名稱為Command1，然后編寫如下事件過程： Private Sub Command1_Click() Dim s1 As String, s2 As String s1 = "abcd" Call St(s1, s2) Print s2 End Sub 程序運行后，單擊命令按鈕，輸出結果是 A.abcd B.dabc C.dcba D.abdc 35.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序代碼： Dim x As Integer Private Sub MySub() Static x As Integer Dim y As Integer x = x + 10 y = y + 10 Print "x="; x; "y="; y; End Sub Private Sub Form_Load() x = 50 End Sub Private Sub Command1_Click() Call MySub MySub Print "x="; x End Sub 程序運行時，單擊Command1，則在窗體上輸出的結果是 A.x=10 y=10 x=60 y=10 x=60 B. x=60 y=10 x=70 y=10 x=70 C.x=60 y=10 x=70 y=10 x=50 D.x=10 y=10 x=20 y=10 x=50 36.在窗體上畫２個文本框（名稱分別為Text1和Text2），一個命令按鈕（名稱為Command1）。并定義以下記錄類型和變量： Private Type Teacher ID As Integer Name As String * 10 End Type Dim Teach As Teacher 程序運行后，在Text1中輸入編號（ID），在Text2中輸入姓名（Name），然后單擊命令按鈕，則把兩個文本框中的內容寫入隨機文件d:\f1.txt。以下能夠正確實現(xiàn)上述功能的事件過程是 A.Private Sub Command1_Click() Open "d:\f1.txt" For Random As #1 Len = Len(Teach) Teach.ID = Val(Text1.Text) Teach.Name = Text2.Text Put #1, 1, Teach Close #1 End Sub B. Private Sub Command1_Click() Open "d:\f1.txt" For Random As #1 Len = Len(Teach) Teach.ID = Val(Text1.Text) Teach.Name = Text2.Text Put #1, Teach.ID, Teach.Name Close #1 End Sub C.Private Sub Command1_Click() Open "d:\f1.txt" For Random As #1 Len = Len(Teach) Teach.ID = Val(Text1.Text) Teach.Name = Text2.Text Write #1, 1, Teach Close #1 End Sub D.Private Sub Command1_Click() Open "d:\f1.txt" For Random As #1 Len = Len(Teach) Teach.ID = Val(Text1.Text) Teach.Name = Text2.Text Write #1, Teach.ID, Teach.Name Close #1 End Sub 37.在窗體上畫2個名稱分別為Label1和Label2的標簽，然后編寫如下程序代碼： Sub S(L As Label, ByVal a As Integer) L.Caption = "1234" a = a * a End Sub Private Sub Form_Load() Label1.Caption = "ABCD" Label2.Caption = 10 End Sub Private Sub Form_Click() Dim a As Integer a = Val(Label2.Caption) S Label1, a Label2.Caption = a End Sub 運行程序，單擊窗體，在兩個標簽中顯示的內容分別是 A.ABCD和10 B.1234和100 C.ABCD和100 D.ABCD和100 38.在窗體上畫一個名稱為Command1的命令按鈕，一個名稱為Text1的文本框數(shù)組（含４個文本框，下標從０開始），然后編寫如下事件過程： Private Sub Command1_Click() Dim i As Integer, n As Integer For Each TextBox In Text1 Text1(i) = Text1(i).Index n = 10 * (n + Val(Text1(i).Text)) i = i + 1 Next Print n End Sub 運行程序，單擊命令按鈕Command1，則在窗體上的輸出結果是 A. 0123 B.123 C.1234 D.1230 39.有如下通用過程： Function Fs(ByVal n As Long) As Long Dim k As Long k = 1 n = Abs(n) Do While n k = k * (n Mod 10) n = n \ 10 Loop Fs = k End Function 編寫如下事件過程： Private Sub Form_Click() Dim a As Long Dim b As Long a = InputBox("請輸入一個數(shù)") a = CLng(A) b = Fs(A) Print b End Sub 程序運行后，單擊窗體，在輸入對話框中輸入567，輸出結果為 A.56 B.67 C.210 D.18 40.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程： Option Base 1 Private Sub Command1_Click() Dim a(3, 3) As Integer Dim i As Integer, j As Integer, s As Integer s = 0 For i = LBound(a, 1) To UBound(a, 1) For j = LBound(a, 2) To UBound(a, 2) a(i, j) = (i - 1) * 3 + j If i >= j Then s = s + a(i, j) End If Next j, i Print s End Sub 程序運行時，單擊Command1，則在窗體上輸出的結果是 A.15 B.26 C.34 D.19 1.B 2.B 3.D 4.C 5.D 6.B 7.A 8.A 9.A 10.A 11.C 12.C 13.B 14.D 15.D 16.C 17.B 18.A 19.B 20.D 21.B 22.A 23.D 24.B 25.A 26.D 27.A 28.B 29.A 30.A 31.A 32.A 33.A 34.C 35.D 36.A 37.D 38.D 39.C 40.C |