1[單選題] 有下面事件過程：

程序運行后，產生的效果是

A.在窗體上每單擊鼠標左鍵一次，就在鼠標位置處畫—個點

B.按著鼠標左鍵，移動鼠標，可在窗體上畫出鼠標的運動軌跡

C.按著鼠標右鍵，移動鼠標，可在窗體上畫出鼠標的運動軌跡

D.不接任何鼠標鍵，移動鼠標，可在窗體上畫出鼠標的運動軌跡

參考答案：C

參考解析：

MouseMove中Button是一個整數，它對應鼠標各個按鈕的狀態，如果某個按鈕按下，其中就有一個二進制位被設置。Button參數是具有相應于左按鈕(位0)，右按鈕(位1)，以及中間按鈕(位2)的一個位字段。這些位的值分別等于1，2，和4。它指示這些鼠標按鈕的整體狀態;三個二迸制位中的一些、全部、或一個也沒有被設置，指示這些按鈕中的一些、全部、或一個也沒有被按下。程序中Button=2表示鼠標右鍵被按下。故答案選C.。

2[單選題] 兩個或兩個以上模塊之間關聯的緊密程度稱為()。

A.耦合度B.內聚度C.復雜度D.數據傳輸特性

參考答案：A

參考解析：耦合度是指模塊之間的關聯程度，內聚度是指模塊內部各部分的聚合程度。

3[簡答題](1)在考生文件夾下有工程文件sj3.vbp及窗體文件sj3.frm，該程序是不完整的。在名稱為Form1的窗體上有3個Text控件及5個命令按鈕，功能為：開始啟動工程時，界面上除“讀取數據”及“關閉”按鈕有效之外，其他按鈕均不可用(灰色顯示);單擊“讀取數據”按鈕之后，利用InputBox讓用戶連續且必須輸入8個數。若錄入為非數字符號，則給出提示“輸人數據無效，請重新輸入：”;輸入完畢后，“讀取數據”變灰，其他變為可用狀態;按相應的按鈕可分別求出所輸人數據的升序排列及平均值，并在右側對應的文本框中顯示(注意用A(8)存放最大數，A(1)存放最小數);單擊“清空”按鈕將所有文本框清空。如圖70-3所示。

注意：請在有“?”的地方填入正確內容，然后刪除“?”及代碼前的所有注釋符“'”，但不能修改其他部分。存盤時不得改變文件名和文件夾。

(2)在考生文件夾下有工程文件sj4.vbp及窗體文件sj4.frm，該程序是不完整的。在名稱為Form1，窗體上有3個Label控件、2個Text控件和2個命令按鈕。該程序的主要功能是求從1到Text1中用戶輸入的任意自然數n的累加和。剛啟動工程時，可以在輸人框內輸入任意自然數(n值太大時，運算時間將很長，建議不超過4位)。當輸人為非數值時，累加結果為0;單擊“開始”可以在Text2中顯示累加和，同時“開始”變為“完成”并變灰;單擊“關閉”按鈕結束程序的運行。如圖70-4所示。

注意：請在有“?”的地方填入正確內容，然后刪除“?”及代碼前的所有注釋符“'”，但不能修改其他部分。存盤時不得改變文件名和文件夾。

參考解析：

(1)用數組str(8)來接收InputBox輸入的8個數，In-putBox的格式為：InputBox(提示[，標題][，默認][，X坐標位置][，Y坐標位置]);Enabled屬性可設置控件是否可用，當該值為True時可用，為False時不可用(灰色);Val()函數將字符轉換成數值。

根據題意，將5個命令按鈕和3個文本框控件添加到窗體中，命令按鈕的名稱分別為Command1、Command2.Command3、Command4和Command5，Caption屬性分別為“讀取數據”、“升序顯示”、“平均值”、“清空”和“關閉”，文本框的名稱分別為Text1、Text2和Text3，Text屬性都為空。

雙擊Command1進入代碼窗口，補充后的代碼如下：

(2)要計算累加和通常利用for循環來完成。文本框中的內容(包括數字)默認都是當做字符串來處理的，如果要參與數據運算則需先用Val( )函數將其轉化為數字。

根據題意，將3個標簽、2個命令按鈕和2個文本框控件添加到窗體中，標簽的Caption屬性分別為“要求：程序能得到結果total，total=l+2+3+…+n”、“輸入n(0

4[簡答題]在考生文件夾下有一個工程文件sjt5.vbp，其窗體上有兩個標題分別是“讀數據”和“統計”的命令按鈕，一個名稱為Textl的文本框，兩個標簽控件，如圖所示。

程序功能如下：

①單擊“讀數據”按鈕，則將考生文件夾下in5.dat文件的內容(該文件中含有不超過800個英文單詞，單詞之問用1個空格隔開)顯示在Textl文本框中;

②單擊“統計”按鈕，則自動統計Textl中所有5字母單詞的個數，并顯示在右下角的Labell標簽中。“讀數據”按鈕的Click事件過程已經給出，“統計”按鈕的Click事件過程不完整，函數GetWords的功能是從字符串s中分離出每個單詞，依次放入數組words的數組元素中，返回值為單詞的總數目。

要求：請將程序中的注釋符去掉，把?改為正確的內容;補全“統計”按鈕Click事件過程中的代碼，以實現上述程序功能。

注意：考生不得修改窗體文件中已經存在的控件和程序，在結束程序運行之前，必須進行“統計”，且必須用窗體右上角的關閉按鈕結束程序，否則無成績。最后，程序按原文件名存盤。

參考解析：

【解題思路】從文件中讀取一串文本到文本框中，將文本框中的內容劃分到數組中，遍歷數組中的內容，如果字符串長度等于5，長度為5的單詞個數增加1。

【操作步驟】

步驟1：打開本題工程文件。

步驟2：打開代碼編輯窗口，去掉程序中的注釋符“′”，將問號改為正確的內容，并在指定位置編寫代碼。

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

步驟3：調試并運行程序，關閉程序后按題目要求存盤。

5[單選題] 在窗體上畫一個命令按鈕，然后編寫如下程序：

程序運行后，第一次單擊命令按鈕時的輸出結果為

A.2 3 4B.2 5 9C.11 14 18D.4 9 16

參考答案：B

參考解析：x在inc函數中定義成Static類型。意味著函數退出后X值被保留。第一次執行后X=2，第二次執行后X=5，第3次執行后X=9。選B.。

6[單選題] 窗體上有名稱為Commandl的命令按鈕和名稱為Textl的文本框

運行以上程序，單擊命令按鈕后( )。

A.文本框中顯示的是“程序設計”，且焦點在文本框中

B.文本框中顯示的是“等級考試”，且焦點在文本框中、、、

C.文本框中顯示的是“程序設計”，且焦點在命令按鈕上

D.文本框中顯示的是“等級考試”，且焦點在命令按鈕上

參考答案：B

參考解析：運行程序，單擊命令按鈕后，執行Com.mandl-click事件過程代碼，文本框Textl中顯示“程序設計”，并且文本框Textl獲得焦點，此時焦點在Textl中;當Textl獲得焦點就會觸發它的Got—Focus事件，執行Got—Focus事件過程，結果文本框Textl中顯示“等級考試”。故B選項正確。

7[單選題] Print Format(1234.56，”###.#”)語句的輸出結果是

A.123.4B.1234.6C.1234.5D.1234.56

參考答案：B

參考解析：Format是格式輸出函數，數據要按照“輸出格式字符串”指定格式輸出。“輸出格式字符串”中#表示顯示一數字，若此位置沒有數字則不顯示。本題中“輸出格式字符串”整數部分###長度小于1234時，l234按原樣輸出，小數部分#長度為1，則小數部分保留一位，四舍五入取6，故選B。

8[單選題]以下關于文件的敘述中，錯誤的是

A.順序文件有多種打開文件的方式

B.讀取順序文件的記錄時。只能從頭至尾逐記錄進行

C.順序文件中各記錄的長度是固定的

D.隨機文件一般占用空間比較小

參考答案：C

參考解析：順序文件中各記錄的長度不固定。

9[單選題] 窗體上有2個名稱分別為Textl和Text2的文本框。編寫如下程序：

程序運行后，在Textl和Text2中依次輸入100和200，并單擊命令按鈕Commandl，則輸出結果為

A.100B.200C.300D.100200

參考答案：D

參考解析：單擊命令按鈕Commandl，觸發Commandl_Click()事件，Print語句連續輸出文本框Textl和Text2的text值。選D.。

10[簡答題]在考生文件夾中有一個工程文件sit3.vb0。運行程序時，先向文本框Textl中輸入一個不超過l0的正整數，然后選擇“N的階乘”或“(N+2)的階乘”單選鈕，即可進行計算，計算結果在文本框Text2中顯示，如圖所示。在給出的窗體文件中已經添加了全部控件，但程序不完整。要求：去掉程序中的注釋符，把程序中的?改為正確的內容。

注意：不能修改程序的其他部分和控件屬性，最后將修改后的文件按原文件名進行存盤。

參考解析：

在單擊單選按鈕數組事件過程中，首先向文本框1ktl中輸入一個不超過l0的正整數，通過Val函數實現字符向數值的轉換，然后選擇“N的階乘”或“(N+2)的階乘”單選按鈕，通過Select Case語句和單選按鈕數組的Index屬性，確定所調用函數的參數，從而調用Function fl()過程函數進行計算，將計算結果顯示在文本框Te地中。

【操作步驟】

步驟l：打開本題工程文件。步驟2：分析并編寫程序代碼。程序提供代碼

Private Sub Optionl～Click(Index As Integer)Dim n AsInteger

n=ValfTextl.Text)‘Select Case?

Case 0

Text2."rext=fl(?)Casel

Text2.Text=fl(?)End Select

End Sub

Public Function fl(n As Integer)A8 LongDim xAs Long

X=1

下h i=1 T0 7x2X十i

Next‘?=XEnd Function程序結束

參考答案

第1個?處填人：Index第2個?處填入：n

第3個?處填入：n+2.第4個?處填人：n

第5個?處填入：n

步驟3：調試并運行程序，關閉程序后按題目要求存盤。

更多精彩資訊請關注查字典資訊網，我們將持續為您更新最新資訊!