2008年4月全国计算机等级考试二级VB试卷

2008年4月全國計算機等級考試二級VB試卷一、選擇題1、程序流程圖中帶有箭頭的線段表示的是A）圖元關系 B）數據流C）控制流D)調用關系2、結構化程序設計的基本原則不包括A）多態性 B）自頂向下 C）模塊化D）逐步求精3、軟件設計中模塊劃分應遵循的準則是A）低內聚低耦合 B)高內聚低耦合 C)低內聚高耦合 D)高內聚高耦合4、在軟件開發中，需求分析階段產生的主要文檔是A）可行性分析報告 B）軟件需求規格說明書 C）概要設計說明書 D）集成測試計劃5、算法的有窮性是指A）算法程序的運行時間是有限的 B）算法程序所處理的數據量是有限的C）算法程序的長度是有限的 D）算法只能被有限的用戶使用6、對長度為n的線性表排序，在最壞的情況下，比較次數不是n (n-1)/2的排序方法是A）快速排序 B）冒泡排序C）直接插入排序D）堆排序GAGGAGAGGAFFFFAFAF7、下列關于棧的敘述正確的是A）棧按“先進先出”組織數據B）棧按“先進后出”組織數據C）只能在棧底插入數據D）不能刪除數據8、在數據庫設計中，將E—R圖轉換成關系數據模型的過程屬于A）需求分析階段 B）概念設計階段 C）邏輯設計階段 D）物理設計階段9、有三個關系R、S和T如下：R S ArrayT由關系Ｒ和S通過運算得到關系T，則所使用的運算為A）并B）自然連接C）笛卡爾積D）交10、設有表示學生選課的三張表，學生S（學號，姓名，性別，年齡，身份證號），課程（課號，課名），選課SC（學號，課號，成績），則表SC的關鍵字（鍵或碼）為Ａ）課號，成績 B）學號，成績 C）學號，課號D）學號，姓名，成績GAGGAGAGGAFFFFAFAF11、以下敘述中錯誤的是Ａ）標準模塊文件的擴展名是.bas B）標準模塊文件是純代碼文件C）在標準模塊中聲明的全局變量可以在整個工程中使用 D）在標準模塊中不能定義過程12、在Visual Basic中，表達式3* 2\5 Mod 3的值是Ａ）１B）０C）３D）出現錯誤提示13、以下選項中，不合法的Visual Basic變量名是Ａ）a5b B）_xyz C）a_bD)andif14、以下數組定義語句中，錯誤的是Ａ）Static a (10) As Integer B) Dim c (3, 1to 4)C) Dim d (-10) D) Dim b (0 to 5,1 to 3) As Integer15、現有語句：y=IIf(x>0, x Mod 3, 0) ，設x=10，則y的值是Ａ）０B）１C）３D）語句有錯16、為了使文本框同時具有垂直和水平滾動條，應先把MultiLine屬性設置為True，然后再把Scrollbars屬性設置為Ａ）０B）１C）２D）３GAGGAGAGGAFFFFAFAF17、文本框Text1的KeyDown事件過程如下：Private SubText1_ KeyDown(KeyCode As Integer,Shift As Integer)End Sub其中參數KeyCode的值表示的是發生此事件時Ａ）是否按下了Alt鍵或Ctrl鍵B）按下的是哪個數字鍵C）所按的鍵盤鍵的鍵碼D）按下的是哪個鼠標鍵18、窗體上有一個名稱為Hscroll1的滾動條，程序運行后，當單擊滾動條兩端的箭頭時，立即在窗體上顯示滾動框的位置（即刻度值）。

下面能夠實現上述操作的事件過程是Ａ）Private Sub Hscroll1_Changc() B)Private Sub Hsctroll1_Change()Print HScroll1.Value Print HScroll1.SmallChangeEnd Sub End SubC)Private Sub HScroll1_Scroll()D)Private Sub HScroll1_Scroll()Print HScroll1.Value Print HScroll1.SmallChangeEnd SubGAGGAGAGGAFFFFAFAFEnd Sub19、若已把一個命令按鈕的Default屬性設置為True，則下面可導致按鈕的Click事件過程被調用的操作是Ａ）用鼠標右鍵單擊此按鈕 B）按鍵盤上的Esc鍵C）按鍵盤上的回車鍵D）用鼠標右鍵雙擊此按鈕20、要使兩個單選按鈕屬于同一個框架，正確的操作是Ａ）先畫一個框架，再在框架中畫兩個單選按鈕B）先畫一個框架，再在框架外畫兩個單選按鈕，然后把單遠按鈕拖到框架中C）先畫兩個單選按鈕，再畫框架將單選按鈕框起來D）以上三種方法都正確21、能夠存放組合框的所有項目內容的屬性是Ａ）Caption B)Text C)ListD)Selected22、設窗體上有一個標簽Labell和一個計時器Timer1，Timer1的Interval屬性被設置為1000，Enabled屬性被設置為True。

要求程序運行時每秒在標簽中顯示一次系統當前時間。

以下可以實現上述要求的事件過程是Ａ）Private Sub Timer1_Timer() B)Private Sub Timer1_Timer()Label1.Caption=TrueGAGGAGAGGAFFFFAFAFLabel1.Caption=Time$End Sub End SubC) Private Sub Timer1_Timer() D)Private Sub Timer1_Timer()Label1.Interval=1For k = l To Timer1.IntervalEnd Sub Label1.Caption=TimerNext kEnd Sub23、設有如圖所示窗體和以下程序：Private Sub Command1_Click()Textl.Text=“VisualBasic”End SubPrivate SubText1_LostFocus()If Text1.Text <>“BASIC”ThenText1.Text=””Text1.SetFocusGAGGAGAGGAFFFFAFAFEnd IfEnd Sub程序運行時，在Text1文件框中輸入“Basic”(如圖所示)，然后單擊Command1按鈕，則產生的結果是Ａ）文本框中無內容，焦點在文本框中 B）文本框中為“Basic”,焦點在文本框中C）文本框中為“Basic”,焦點的按鈕上 D）文本框中為“Visual Basic”,焦點的按鈕上24、窗體上有一個名稱為Command1的命令按鈕，其事件過程如下：Private Sub Command1_Click()x=“VisualBasicProgramming”a=Right(x,11)b=Mid(x,7,5)C=Msgbox(a, , b)End Sub運行程序后單擊命令按鈕，以下敘述中錯誤的是Ａ）信息框的標題是Basic B)信息框中的提示信息是ProgrammingC) C的值是函數的返回值D）MsgBox的使用格式有錯25、設工程文件包含兩個窗體文件Form1.frm、Form2.frm 及一個標準模塊文件Module1.bas，兩個窗體上分別只有一GAGGAGAGGAFFFFAFAF個名稱Command1的命令按鈕。

Form1的代碼如下：Public X As IntegerPrivate Sub Form_load()x=1y=5End SubPrivate Sub Command1_Click()Form2.ShowEnd SubForm2的代碼如下：Private Sub Command1_Ciick()Print Form1.x,yEnd SubModule1的代碼如下：Public y As Integer運行以上程序，單擊Form1的命令按鈕Command1，則顯示Form2；再單擊Form2上的命令按鈕Command1，則窗體上顯示的是Ａ）１５B）０５ C）００D）程序有錯26、窗體上有一個名稱Text1的文本框，一個名稱為Command1的命令按鈕。

窗體文件的程序如下：GAGGAGAGGAFFFFAFAFPrivate Type xa As Integerb AS IntegerEnd TypePrivate Sub Command1_Click()Dim y As xy.a = InputBox(“”)If y.a\2=y.a/2 Theny.b=y.a*y.aElsey.b = Fix(y.a/2)End IfText1.Text=y.bEnd Sub對以上程序，下列敘述中錯誤的是Ａ）x是用戶定義的類型 B）InputBox函數彈出的對話框中沒有提示信息C）若輸入的是偶數，y.b的值為該偶數的平方D）Fix(y.a/2)把y.a/2的小數部分四舍五入，轉換為整數返回27、窗體上有一個名稱為CD1的通用對話框控件和由四個命令按鈕組成的控件數Command1,其下標從左到右分別為0、1、2、3,窗體外觀如圖所示。

GAGGAGAGGAFFFFAFAF命令按鈕的事件過程如下：Private Sub Command1_Click(Index As Integer) Select Case IndexCase 0CD1.Action=1Case 1CD1.ShowSaveCase 2CD1.Action=5Case 3EndEnd SelectEnd Sub對上述程序，下列敘述中錯誤的是Ａ）單擊“打開”按鈕，顯示打開文件的對話框B）單擊“保存”按鈕，顯示保存文件的對話框C）單擊“打印”按鈕，能夠設置打印選項，并執行打印操作D）單擊“退出”按鈕，結束程序的運行28、窗體上有兩個水平滾動條HV、HT，還有一個文本框Text1和一個標題為“計算”的命令按鈕Command1，并編寫了以下程序：Private Sub Command1_ClickOGAGGAGAGGAFFFFAFAFCall Cale (HV.Value, HT.Value)End SubPublic Sub Cale(x AS Integer , y AS Integer)Text1.Text = x* yEnd Sub運行程序，單擊“計算”按鈕，可根據速度與時間計算出距離，并顯示計算結果。

對以上程序，下列敘述中正確的是Ａ）過程調用語句不對，應為Cale (HV,HT)B) 過程定義語句的形式參數不對，應為Sub Cale(x As Control , y As Control)C) 計算結果在文本框中顯示出來D）程序不能正確運行29、現有如下程序：Private Sub Command1_ Click()S=0For i=1 to 5S=S+f(5+i)NextPrint SEnd SubPublic Function f(x As Integer)If x>=10 Thent=x+1GAGGAGAGGAFFFFAFAFElset=x+2End Iff=tEnd Function運行程序，則窗體上顯示的是Ａ）38 B）49 C）61 D）7030、窗體上有一個用菜單編輯器設計的菜單（見上圖）。