計算機二級VB強化訓練題及答案
2017下半年計算機二級考試即將開始，考生們在複習過程中要多做題多練習，以下是小編搜索整理的計算機二級VB強化訓練題及答案，供參考練習，希望對大家有所幫助!
一、單選題
1). 數據庫系統的核心是( )。
A.數據模型
B.數據庫管理系統
C.數據庫
D.數據庫管理員
正確答案：B
2). 為了對多個控件執行操作，必須選中這些控件。下列不能選中多個控件的操作是( ).
A.按住Alt鍵，不要鬆開，然後單擊每個要選中的控件
B.按住Shift鍵，不要鬆開，然後單擊每個要選中的控件
C.按住Ctrl鍵，不要鬆開，然後單擊每個要選中的控件
D.拖動鼠標畫出一個虛線矩形，使所選中的控件位於這個矩形內
正確答案：A
答案解析：按住Alt鍵只能選中單個控件，不能同時選中多個控件。故選A。
3). 下面的變量名合法的是( )
A.k_name
D.k-name
正確答案：A
4). 為了使窗體左上角不顯示控制框，需設置為False的屬性是( ).
ble
led
rolBox
ion
正確答案：C
答案解析：窗體的Visible屬性是設置窗體可見不可見;Enabled屬性是設置可用不可用;Caption屬性是用來設置窗體標題欄上顯示的內容;ControlBox屬性是設置窗體左上角是否顯示控制框，當屬性值為True時，顯示控制框，否則False時，不顯示。故選項C正確。
5). 以下關於控件的敍述中，正確的是( )
A.標籤控件能夠獲得焦點
B.不能對列表框中的'列表項進行多項選擇
C.命令按鈕的外觀可以被設置為圖形
D.設置形狀控件的Shape屬性，可以使其呈現為直線
正確答案：C
答案解析：標籤、框架、菜單、直線、形狀、圖像框、計時器都不能接收焦點，選項A錯誤;列表框用於顯示可供做單一或多個選擇的列表項，選項B錯誤;形狀控件(Shape)提供了顯示一些規則圖形的簡易方法，通過設置形狀控件Shape屬性值，可顯示6種圖形：0-矩形、1-正方形、2-橢圓、3-圓、4-圓角矩形、5-圓角正方形，選項D錯誤。
二、簡單應用題
(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。
(2)【考點分析】本題考點有：Mod運算符、文件編輯、For循環語句、If判斷語句以及過程函數。
【解題思路】可通過求餘運算符Mod來計算某數M能否被7整除，如果MMod7=0，那麼M能被7整除;如果MMod7<>0，那麼M不能被7整除。可利用For循環語句來逐個判斷0～1000範圍內的整數能否被7整除，然後用一個變量來統計不能被7整除的整數個數。
【操作步驟】
步驟1：打開本題工程文件。
步驟2：打開代碼編輯窗口，在代碼編輯窗口指定位置編寫以下代碼。
參考答案
FunctionFun()
DimSAsInteger，iAsInteger
Fori=0To1000。求0～1000中滿足條件的數
IfiMod7<>OThen
s=s+1′將滿足條件的數的個數累加
EndIf
Nexti
Fun=s’返回結果
EndFunction
步驟3：調試並運行程序，關閉程序後按題目要求存盤。
