0514VB程序設計在線作業(yè)

1、VB程序設計在線作業(yè)（單選題）1:在窗體上畫一個名稱為 Comma nd的命令按鈕，然后編寫如下事件過程：Private Sub Comma nd1_Click（） Dim num As In teger num = 1 Do Un til num > 6 Print num; num = num + 2.4 Loop End Sub程序運行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是（）。A: 1 3.4 5.8B: 1 3 5C: 1 4 7D：無數(shù)據(jù)輸出(單選題)2:窗體上有一組合框 Combol,窗體加載時的代碼如下： Private Sub Form_Load() Combol. A

2、ddItem "電視機” Combol. AddItem "錄像機” Combol. AddItem “VCt” Combol.AddItem "組合音響”End Sub要在文本框Textl中顯示列表中的第三個項目，則正確的語句的是()。A: Textl.Text=Combol.List(0)B: Textl.Text=Combol.List(1)C: Textl.Text=Combol.List(2)D: Textl.Text=Combol.List(3)(單選題)3:在窗體中添加一個命令按鈕，然后編寫如下程序：Private SubCommand1_Click

3、() Dim a As Integer, b As Integer a=InputBox("Enter the Firstinteger") b=InputBox("Enter the Secondinteger") Print b+a End Sub 程序運行后，單擊命令按鈕, 先后在兩個輸入框中分別輸入 123和123,則輸出結果是()。A: 246B: 123C: 456D:123123（單選題）4:在下列動作中，不能引發(fā)命令按鈕Click事件的是（）。A:在按鈕上單擊鼠標左鍵B:在按鈕上單擊鼠標右鍵C:把焦點轉移到按鈕上，然后按回車D:如果按鈕有

4、快捷字母鍵，按Alt+快捷字母鍵（單選題）5: ADO 數(shù)據(jù)控件的RecordSoure屬性是表示（）。A：與ADO數(shù)據(jù)控件連接的數(shù)據(jù)庫B：與數(shù)據(jù)庫的連接方式C：數(shù)據(jù)庫類型D: ADO數(shù)據(jù)控件可訪問的數(shù)據(jù)來源（單選題）6:為了保留動態(tài)數(shù)組中原有元素的值，需要使用關健字（）。A: StaticB: PreserveC: Opti on BaseD: Opti on Compare（單選題）7:能夠觸發(fā)文本框 Cha ng事件的操作是（）。 A:文本框失去焦點B:文本框獲得焦點C:設置文本框的焦點D:改變文本框的內(nèi)容（單選題）8:當拖動滾動條中的滾動塊時，將觸發(fā)滾動條的哪個事件（）。A: Move

5、B: ChangeC: ScrollD: SetFocus（單選題）9:在窗體上有一個文本框控件，名稱為TxtTime ; 一個計時器控件，名稱為Timerl，要求每一秒鐘在文本框中顯示一次當前的時間，程序為：Private Sub Timerl（）TxtTime.text=Time End Sub在橫線上應填入的內(nèi)容是（）。A: En abledB: VisibleC: In tervalD: Timer(單選題)10:設有如下程序：Option Base 0 Private Sub Form_Click() Dim a Dim I AsIn teger a=Array(1,2,3,4,5,

6、6,7,8,9) For I=0 To 3 Print a(5 - I); Next I End Sub程序運行后，單擊窗體，則在窗體上顯示的是()。A:4321B:5432C:6543D: 7654(單選題)11:設有如下通用過程：Public Sub Fun(a(),ByVal x As Integer) For i = 1To 5 x = x + a(i) Next End Sub在窗體上畫一個名稱為Text1的文本框和一個名稱為Comma nd的命令按鈕，然后編寫如下的事件過程Private Sub Comma nd1_Click() Dim arr(5)As Variant For

7、i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text =n End Sub程序運行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是()。A: 10B: 15C: 25D: 24(單選題)12:使文本框獲得焦點的方法是()。A: GotFocusB: ChangeC: ListFocusD: SetFocus（單選題）13:圖像框有一個屬性，可以自動調整圖形的大小，以適應圖像框的尺寸，該屬 性是（）。A: AutosizeB: StretchC: AutoredrawD: Appeara nee（單選題）14:下列哪種說法正確的

8、是（）。A:通用對話框是Visual Basic 6.0的內(nèi)部標準控件B:要使用Com mon Dialog控件，必須在"工程”菜單下的"部件”對話框中選定“ MicrosoftCom mon Dialog Con trol 6.0”C:打開“部件”對話框只有一種方法D:程序運行過程中，通用對話框在窗體中是可見的（單選題）15:設有語句：x=lnputBox（"輸入數(shù)值","0"," 示例”）程序運行后，如果從鍵盤 上輸入數(shù)值10并按回車鍵，則下列敘述中正確的是（）。A:變量x的值是數(shù)值10B:在inputbox對話框標題欄

9、中顯示的是“示例”C: 0是默認值D:變量x的值是字符串“ 10”（單選題）16:設在菜單編輯器中定義了一個菜單項，名為Menu1,為了在運行時隱藏該菜單項應使用的語句是（）。A: Men u1.E nabled=TrueB: Me nu1.E nabled=FalseC: Men u1.Visible=TrueD: Men u1.Visible=False（單選題）17:下列哪些方法不屬于通用對話框（）。A: ShowColorB: ShowFo ntC: ShowPri ntD: ShowList（單選題）18:在窗體上畫一個名稱為 Comma nd的命令按鈕和兩個名稱分別為 Text1、

10、Text2 的文本框，然后編寫如下事件過程： Private Sub Command1_Click（） n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2,4,6 x = 20 Case Is<10 x = 30 Case 10 x = 40 EndSelect Text2.Text = x End Sub程序運行后，如果在文本框Text1中輸入10，然后單擊命令按鈕，則在 Text2中顯示的內(nèi)容是（）。A: 10B: 20C: 30D: 40（單選題）19:用下面語句定義的數(shù)組，其元素個數(shù)是（）。Dim A （-3 To 5） As IntegerA: 6B: 7C: 8D: 9（單選題）20:在窗體上畫一個命令按鈕（其Name屬性為Commandl，然后編寫如下代碼：Option Base 1 Private Sub Command1_Cli