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

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

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

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

C.對(duì)同一個(gè)問(wèn)題，采用不同的算法，則它們的時(shí)間復(fù)雜度是相同的

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

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

A.DEFXYZABC   

B.DEFXYZABC   

C.FEDXYZCBA   

D.DEFZYXABC

3.下列敘述中正確的是

A.有兩個(gè)指針域的鏈表稱為二叉鏈表

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

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

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

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

A.400 

B.754 

C.756

D.不確定

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

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

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

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

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

6.下面對(duì)軟件測(cè)試描述錯(cuò)誤的是

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

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

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

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

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

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

B.過(guò)程、子程序和分程序

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

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

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

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

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

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

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

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

A.多對(duì)多 

B.一對(duì)多 

C.多對(duì)一

D.一對(duì)一

10.

A.交

B.差

C.并 

D.選擇

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

A.29

B.25

C.26

D.36

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

A. Int(X) >= Abs(X)

B. Int(X) = Abs(X)

C. Int(X) <= Abs(X)

D.Int(X) <> Abs(X)

13. 要求在窗體中定義一個(gè)變量x，在本窗體所有過(guò)程中都可以訪問(wèn)它，而在其他模塊中不能訪問(wèn)，則該變量的定義是

A.在本窗體的某個(gè)過(guò)程中寫(xiě)語(yǔ)句：Dim x

B.在本窗體所有過(guò)程之前寫(xiě)語(yǔ)句：Dim x

C.在本窗體所有過(guò)程之前寫(xiě)語(yǔ)句：Public x

D.在本窗體的所有過(guò)程中寫(xiě)語(yǔ)句：Dim x

14.以下敘述中錯(cuò)誤的是

A.對(duì)象具有屬性、方法等成員

B.對(duì)象可以識(shí)別預(yù)先定義的事件

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

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

15.以下敘述中正確的是

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

A.ListIndex

B.Index

C.TopIndex

D.List

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

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

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

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

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

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

A. File

B.FilePath

C.Path

D.FileName

21.在窗體上畫(huà)2個(gè)名稱分別為T(mén)ext1和Text2的文本框，然后編寫(xiě)如下事件過(guò)程：

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

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

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

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

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

24.下面說(shuō)法中錯(cuò)誤的是

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

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

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

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

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

A.一個(gè)Function過(guò)程的名稱

B.一個(gè)Sub過(guò)程的名稱

C.一個(gè)事件過(guò)程的名稱

D.既可能是一個(gè)Function過(guò)程的名稱，也可能是一個(gè)Sub過(guò)程的名稱

26.下列說(shuō)法中正確的是

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

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

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

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

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

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

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

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

D.有子菜單的菜單項(xiàng)不響應(yīng)Click事件

28.為了向c盤(pán)根目錄下的Stud.txt文件中添加數(shù)據(jù)而不破壞其原有數(shù)據(jù)，下列正確打開(kāi)該文件的語(yǔ)句是

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.如果希望向一個(gè)順序文件寫(xiě)入數(shù)據(jù)，但又要保留文件中的原有內(nèi)容，應(yīng)采取的文件打開(kāi)方式是

A.Append

B.Output

C.Random

D.Input

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

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)行此過(guò)程所產(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.有如下事件過(guò)程：

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.下面程序的功能是找出這樣一個(gè)三位整數(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)填寫(xiě)的是

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.有如下通用過(guò)程：

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

在窗體上畫(huà)一個(gè)命令按鈕，其名稱為Command1，然后編寫(xiě)如下事件過(guò)程：

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.在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕，然后編寫(xiě)如下程序代碼：

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)行時(shí)，單擊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.在窗體上畫(huà)２個(gè)文本框（名稱分別為T(mén)ext1和Text2），一個(gè)命令按鈕（名稱為Command1）。并定義以下記錄類型和變量：

Private Type Teacher

    ID As Integer

    Name As String * 10

End Type

Dim Teach As Teacher

程序運(yùn)行后，在Text1中輸入編號(hào)（ID），在Text2中輸入姓名（Name），然后單擊命令按鈕，則把兩個(gè)文本框中的內(nèi)容寫(xiě)入隨機(jī)文件d:\f1.txt。以下能夠正確實(shí)現(xiàn)上述功能的事件過(guò)程是

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.在窗體上畫(huà)2個(gè)名稱分別為L(zhǎng)abel1和Label2的標(biāo)簽，然后編寫(xiě)如下程序代碼：

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)行程序，單擊窗體，在兩個(gè)標(biāo)簽中顯示的內(nèi)容分別是

A.ABCD和10

B.1234和100

C.ABCD和100

D.ABCD和100

38.在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕，一個(gè)名稱為T(mén)ext1的文本框數(shù)組（含４個(gè)文本框，下標(biāo)從０開(kāi)始），然后編寫(xiě)如下事件過(guò)程：

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.有如下通用過(guò)程：

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

編寫(xiě)如下事件過(guò)程：

Private Sub Form_Click()

    Dim a As Long

    Dim b As Long

    a = InputBox("請(qǐng)輸入一個(gè)數(shù)")

    a = CLng(A)

    b = Fs(A)

    Print b

End Sub

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

A.56

B.67

C.210

D.18

40.在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：

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)行時(shí)，單擊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