當前位置:才華齋>IT認證>計算機等級>

2017年9月計算機二級Visual Basic考試試題

計算機等級 閱讀(7.42K)

在 visual basic 中執行應用程式期間,用變數臨時儲存數值。變數有名字(用來引用變數所包含的值的詞)和資料型別(確定變數能夠儲存的資料的種類)。下面是小編收集的關於計算機二級Visual Basic考試試題,希望大家認真閱讀!

2017年9月計算機二級Visual Basic考試試題

  單選題

1). 下面屬於黑盒測試方法的是( )

A.語句覆蓋

B.邏輯覆蓋

C.邊界值分析

D.路徑覆蓋

正確答案:C

答案解析:黑盒測試不關心程式內部的邏輯,只是根據程式的功能說明來設計測試用例。在使用黑盒測試法時,手頭只需要有程式功能說明就可以了。黑盒測試法分等價類劃分法、邊界值分析法和錯誤推測法,答案為C。而A、B、D均為白盒測試方法。

2). 下列關於控制元件陣列的敘述中,正確的是( )

A.控制元件陣列可以由不同型別的控制元件組成

B.控制元件陣列元素的最小下標值為1

C.在設計階段,可以改變控制元件陣列元素的Index屬性值

D.控制元件陣列的名字由Caption屬性指定

正確答案:C

答案解析:控制元件陣列必須用同類型的.控制組成,最小下標為0,控制元件陣列的名字由Name屬性指定。選C。

3). 以下敘述中錯誤的是( ).

al Basic 是事件驅動型視覺化程式設計工具

al Basic應用程式不具有明顯的開始和結束語句

al Basic工具箱中的所有控制元件都具有寬度(Width)和高度(Height)屬性

al Basic中控制元件的某些屬性只能在執行時設定

正確答案:C

答案解析:VB工具箱中不是所有的控制元件都具有寬度和高度屬性,比如定時器控制元件Timer、直線控制元件Line就沒有。故C選項錯誤。

4). 要將單選按鈕Optl設為被選中,應設定的屬性是( )

e

cted

led

ocus

正確答案:A

答案解析:單選按鈕Optl要設為選中,可通過設定Value屬性。設定單選按鈕在執行時的兩種狀態:True表示選中,執行時該單選按鈕的圓圈中出現一個黑點。False(預設值)表示未選中。

5). 以下關於MsgBox的敘述中,錯誤的是( )

ox函式返回一個整數

B.通過MsgBox函式可以設定資訊框中圖示和按鈕的型別

ox語句沒有返回值

ox函式的第一個引數是一個整數,該引數只能確定對話方塊中顯示的按鈕數量

正確答案:D

6). 以下不能觸發滾動條Change事件的操作是( ).

A.拖動滾動框

B.單擊兩端的滾動箭頭

C.單擊滾動框

D.單擊滾動箭頭與滾動框之間的滾動條

正確答案:C

答案解析:改變滾動框的位置後會觸發Change事件,拖動滾動框、單擊滾動箭頭、單擊滾動箭頭與滾動框之間的滾動條都會改變滾動框的位置。

  二、簡單應用題

(1)在考生資料夾下有一個工程檔案,相應的窗體檔案為。其功能是隨機產生30個0~1000的整數,放入一個數組中,然後輸出其中的最小值。程式執行後,單擊命令按鈕(名稱為Commandl,標題為“輸出最小值”),即可求出其最小值,並在窗體上顯示出來(如圖所示)。這個程式不完整,請把它補充完整,並使其能正確執行。

要求:去掉程式中的註釋符,把程式中的?改為正確的內容,使其實現上述功能,但不能修改程式中的其他部分。最後將修改後的檔案按原名存檔。

(2)在考生資料夾下有一個工程檔案,相應的窗體檔案為,在窗體上有一個文字框和一個命令按鈕。程式執行後,單擊命令按鈕,即可計算出0~1000範圍內不能被7整除的整數的個數,並在文字框中顯示出來。在窗體的程式碼視窗中,已給出了部分程式,其中計算不能被7整除的整數的個數的操作在通用過程Fun中實現,請編寫該過程的程式碼。

要求:請勿改動程式中的任何內容,只在FunctionFun()和EndFunction之間填入你編寫的若干語句。最後將修改後的檔案按原檔名存檔。

  參考答案

(1)【考點分析】本題考點有:Randomize語句、Rnd()函式、Int()函式、迴圈語句、判斷語句以及Print方法。

【解題思路】本題程式用變數Min記錄最小數,最初把陣列的第一個元素的值賦給Min,然後通過For迴圈語句將其後的元素依次與之比較,如果其值小於Min,則將其賦值給Min,依次類推,最終Min的值就是陣列各元素中的最小值。

【操作步驟】

步驟1:開啟本題工程檔案。

步驟2:開啟程式碼編輯視窗,去掉程式中的註釋符“′”,將問號改為正確的內容。

參考答案(橫線部分是需考生填入的內容)

OptionBase1

PrivateSubCommandl_Click()

DimarrN(30)AsInteger

DimMinAsInteger

RandomiZe

Fori=lTo30

arrN(i):Int(Rnd+__________)

Nexti

__________=arrN(1)將第一個數賦給Min,以提供判斷

Fori=2T030

If__________

Then′比較最小值與其他數值,找出最小值

Min=arrN(i)

EndIf

Npxti

PrIntMin

EndSub

步驟3:除錯並執行程式,關閉程式後按題目要求存檔。

【易錯提示】產生0~1000範圍內的隨機數,應該是RndX1000。