鸭子tv国产极品在线观看_成人69视频在线播放_91精品免费在线观看_亚洲AT永久偷窥无码精品_国产精品自产拍在线观看涩浪潮久

1.下列關(guān)于算法復(fù)雜度敘述正確的是

A.最壞情況下的時間復(fù)雜度一定高于平均情況的時間復(fù)雜度

B.時間復(fù)雜度與所用的計(jì)算工具無關(guān)

C.對同一個問題，采用不同的算法，則它們的時間復(fù)雜度是相同的

D.時間復(fù)雜度與采用的算法描述語言有關(guān)

2.設(shè)有棧S和隊(duì)列Q，初始狀態(tài)均為空。首先依次將A,B,C,D,E,F入棧，然后從棧中退出三個元素依次入隊(duì)，再將X,Y,Z入棧后，將棧中所有元素退出并依次入隊(duì)，最后將隊(duì)列中所有元素退出，則退隊(duì)元素的順序?yàn)?o:p>

A.DEFXYZABC   

B.DEFXYZABC   

C.FEDXYZCBA   

D.DEFZYXABC

3.下列敘述中正確的是

A.有兩個指針域的鏈表稱為二叉鏈表

B.循環(huán)鏈表是循環(huán)隊(duì)列的鏈?zhǔn)酱鎯�結(jié)構(gòu)

C.帶鏈的棧有棧頂指針和棧底指針，因此又稱為雙重鏈表

D.結(jié)點(diǎn)中具有多個指針域的鏈表稱為多重鏈表

4.某二叉樹共有845個結(jié)點(diǎn)，其中葉子結(jié)點(diǎn)有45個，則度為1的結(jié)點(diǎn)數(shù)為

A.400 

B.754 

C.756

D.不確定

5.軟件需求分析階段的主要任務(wù)是

A.確定軟件開發(fā)方法    

B.確定軟件開發(fā)工具

C.確定軟件開發(fā)計(jì)劃

D.確定軟件系統(tǒng)的功能

6.下面對軟件測試描述錯誤的是

A.嚴(yán)格執(zhí)行測試計(jì)劃，排除測試的隨意性

B.隨機(jī)地選取測試數(shù)據(jù)

C.隨機(jī)地選取測試數(shù)據(jù)

D.軟件測試是保證軟件質(zhì)量的重要手段

7.結(jié)構(gòu)化程序的三種基本控制結(jié)構(gòu)是

A.順序、選擇和重復(fù)（循環(huán)）    

B.過程、子程序和分程序

C.順序、選擇和調(diào)用

D.調(diào)用、返回和轉(zhuǎn)移

8.數(shù)據(jù)庫中對概念模式內(nèi)容進(jìn)行說明的語言是

A.數(shù)據(jù)定義語言  

B.數(shù)據(jù)操縱語言

C.數(shù)據(jù)控制語言

D.數(shù)據(jù)宿主型語言

9. 某個工廠有若干個倉庫，每個倉庫存放有不同的零件，相同零件可能放在不同的倉庫中。則實(shí)體倉庫和零件間的聯(lián)系是

A.多對多 

B.一對多 

C.多對一

D.一對一

10.

A.交

B.差

C.并 

D.選擇

11.表達(dá)式  5 * Sqr(25) + Sgn(4 ^ 4)  的值是

A.29

B.25

C.26

D.36

12.無論X取何值，均能成立的表達(dá)式是

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.對象可以識別預(yù)先定義的事件

C.一個對象中包含數(shù)據(jù)及其對這些數(shù)據(jù)的相關(guān)操作

D. 對象的屬性值一經(jīng)初始化，則不能再改變

15.以下敘述中正確的是

A.影響窗體上某個文本框的Tab順序的屬性是TabStop

B.語句Me.Text = "Visual Basic"用于設(shè)置當(dāng)前窗口的標(biāo)題信息

C.用于獲取文本框中當(dāng)前被選中文本的屬性為SelText

D. 要獲取水平滾動條中當(dāng)前滾動塊的位置應(yīng)使用其Position屬性

16.下面關(guān)于組合框Cb1的敘述中正確的是

A.程序運(yùn)行時，列表項(xiàng)可以多選

B.鼠標(biāo)單擊一個列表項(xiàng)后，Cb1.Text 的值等于 Cb1.List(Cb1.ListIndex)的值

C.利用Selected屬性可以判斷哪個列表項(xiàng)被選中了

D.組合框不響應(yīng)Change事件

17.下面關(guān)于組合框Cb1的敘述中正確的是

A.程序運(yùn)行時，列表項(xiàng)可以多選

B.鼠標(biāo)單擊一個列表項(xiàng)后，Cb1.Text 的值等于 Cb1.List(Cb1.ListIndex)的值

C.利用Selected屬性可以判斷哪個列表項(xiàng)被選中了

D.組合框不響應(yīng)Change事件

18.在列表框或組合框中，能夠表示當(dāng)前被選中列表項(xiàng)序號的是

A.ListIndex

B.Index

C.TopIndex

D.List

19.要在程序運(yùn)行過程中把Command1按鈕的標(biāo)題修改為"按鈕"，正確的做法是

A.在屬性窗口中把Command1按鈕的Caption屬性改為“按鈕”

B.在程序中執(zhí)行語句：Command1.Caption = "按鈕"

C.在屬性窗口中把Command1按鈕的Text屬性改為“按鈕”

D.在程序中執(zhí)行語句：Command1.Text = "按鈕"

20.文件列表框中用于設(shè)置或返回所選文件路徑和文件名的屬性是

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

運(yùn)行程序，單擊Text1，該文本框中的內(nèi)容為

A.顯示ABCDEF，且BCD被選中

B.顯示ABCDEF，且CDE被選中

C.顯示BCD

D.顯示CDE

22.下面關(guān)于框架控件的敘述中正確的是

A.框架響應(yīng)Click事件

B.框架可以接受焦點(diǎn)

C.框架的標(biāo)題是字符串，放在Text屬性中

D.可以在框架中輸入文本

23.通過語句X = InputBox("輸入數(shù)據(jù)", "示例", "0")對變體類型的變量X輸入數(shù)據(jù)，程序運(yùn)行后，如果在對話框的輸入?yún)^(qū)中輸入數(shù)值100并按回車鍵，則下列敘述中正確的是

A. 變量X的值是字符串"0"

B.在InputBox對話框標(biāo)題欄中顯示的是“輸入數(shù)據(jù)”

C.輸入對話框的輸入?yún)^(qū)中的初始默認(rèn)值為數(shù)值0

D.變量X的值是字符串"100"

24.下面說法中錯誤的是

A.使用ReDim語句可以改變數(shù)組的維數(shù)

B.使用ReDim語句可以改變數(shù)組的類型

C.使用ReDim語句可以改變數(shù)組的每一維的大小

D.ReDim語句可以使原數(shù)組中的內(nèi)容被清除

25.若程序中有語句：y = proc(6)，則proc 應(yīng)該是

A.一個Function過程的名稱

B.一個Sub過程的名稱

C.一個事件過程的名稱

D.既可能是一個Function過程的名稱，也可能是一個Sub過程的名稱

26.下列說法中正確的是

A. 任何情況下都可以用標(biāo)準(zhǔn)工具欄的“菜單編輯器”按鈕打開菜單編輯器

B. 任何情況下都可以用標(biāo)準(zhǔn)工具欄的“菜單編輯器”按鈕打開菜單編輯器

C.任何情況下都可以用"工具"菜單中的“菜單編輯器”命令打開菜單編輯器

D.只有當(dāng)某個窗體為當(dāng)前活動窗體時，才能打開菜單編輯器

27.下面關(guān)于菜單的敘述中正確的是

A.彈出式菜單和下拉式菜單都可用菜單編輯器編輯

B.彈出式菜單不能有子菜單

C.菜單項(xiàng)可以響應(yīng)Click事件和DblClick事件

D.有子菜單的菜單項(xiàng)不響應(yīng)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ù)，但又要保留文件中的原有內(nèi)容，應(yīng)采取的文件打開方式是

A.Append

B.Output

C.Random

D.Input

30.設(shè)有如下事件過程：

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

運(yùn)行此過程所產(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

以上程序的功能是，計(jì)算 1!+(1!+3!)+(1!+3!+5!)+…+(1!+3!+5!+…+11!) 的值并輸出。程序不完整，在________處應(yīng)填入的內(nèi)容是

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

程序不完整，在橫線上應(yīng)填寫的是

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

程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是

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

程序運(yùn)行時，單擊Command1，則在窗體上輸出的結(jié)果是

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

程序運(yùn)行后，在Text1中輸入編號（ID），在Text2中輸入姓名（Name），然后單擊命令按鈕，則把兩個文本框中的內(nèi)容寫入隨機(jī)文件d:\f1.txt。以下能夠正確實(shí)現(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的標(biāo)簽，然后編寫如下程序代碼：

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

運(yùn)行程序，單擊窗體，在兩個標(biāo)簽中顯示的內(nèi)容分別是

A.ABCD和10

B.1234和100

C.ABCD和100

D.ABCD和100

38.在窗體上畫一個名稱為Command1的命令按鈕，一個名稱為Text1的文本框數(shù)組（含４個文本框，下標(biāo)從０開始），然后編寫如下事件過程：

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

運(yùn)行程序，單擊命令按鈕Command1，則在窗體上的輸出結(jié)果是

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

程序運(yùn)行后，單擊窗體，在輸入對話框中輸入567，輸出結(jié)果為

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

程序運(yùn)行時，單擊Command1，則在窗體上輸出的結(jié)果是

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