*第46 套上機考試試題

一、基本操作題

**請根據以下各小題的要求設計Visual Basic 應用程序

(包括界面和代碼)。

(1)在名稱為Form1、標題為“框架練習”的窗體上

*畫一個名稱為Frame1、標題為“字體”的框架控件；在框

架中畫兩個單選按鈕，名稱分別為Option1、Option2，標題

分別為“宋體”、“黑體”，標題在單選按鈕的左邊。運行后

的窗體如圖2-1 所示。

注意：存盤時，將文件保存至考生文件夾下，且窗體文

件名為sjt1.frm，工程文件名為sjt1.vbp。

圖2-1

***(2)在名稱為F orm1 窗體上，畫一個名稱為Image1

的圖像框，在其中顯示考生文件夾下的圖片“pic2.jpg”，并

設置適當屬性使得圖像框尺寸變化時圖片尺寸可隨之變化。

再畫一個水平滾動條和一個垂直滾動條，名稱分別為

**HScroll1、VScroll1，它們的刻度范圍都是1～3。如圖2-2

(a)所示。要求如下：

①定義兩個窗體級變量：length、high，并編寫窗體

***的Form_Load 事件過程，使length、high 分別等于圖像

框的寬、高；

②編寫適當的事件過程，使得移動兩個滾動條上的滾

動塊時，以刻度值作為圖像框初始尺寸的倍數改變圖像框

**相應方向的尺寸。例如：HScroll1 的滾動塊在刻度值為 2

的位置時，圖像框的寬為初始寬度的 2 倍。如圖2-2(b)

所示。對于垂直滾動條也相同。

注意：存盤時，將文件保存至考生文件夾下，且窗體

*文件名為sjt2.frm，工程文件名為s jt2.vbp。要求程序中的

兩個變量必須是length、high，此外不能再使用其他變量，

除Form_Load 事件過程外，其他每個事件過程中只能寫一

條語句。

*(a)(b)

圖2-2

二、簡單應用題

(1)考生文件夾下的工程文件sjt3.vbp 中有一個菜單、

兩個標簽和兩個文本框。程序運行時，用鼠標右鍵單擊窗體

會彈出一個彈出式菜單(如圖2-3 所示)。當選中“計算100

以內自然數之和”菜單項時，將計算100 以內自然數之和并

放入Text1 中；當選中“計算7！”菜單項時，將計算7！并

放入Text2 中。在給出的窗體文件中已經有了全部控件，但

程序不完整。請將事件過程中的注釋符去掉，把？改為正確

的內容，以實現上述程序功能。

注意：考生不得修改窗體文件中已經存在的控件和程

序，最后將程序按原文件名存盤。

圖2-3

***(2)考生文件夾下的工程文件sjt4.vbp 中有如圖所示的控件。程序功能如下：程序運行時，在Text1 中輸入

一個商品名稱，在Text2 中輸入一個數量，單擊“計算”按

鈕，則會在列表框中找到該商品的單價，乘以數量后顯示在Text3 中(如圖2-4 所示)；若輸入的商品名稱是錯誤的，則

*在Text3 中顯示“無此商品”(為方便編程，列表框中的每

個單價均為 4 位(含小數點))。請將事件過程中的注釋符去掉，把？改為正確的內容，以實現上述程序功能。

注意：考生不得修改窗體文件中已經存在的控件和程

序，最后將程序按原文件名存盤。

圖2-4

三、綜合應用題

考生文件夾下的工程文件sjt5.vbp 中的窗體如圖2-5 所示。考生文件夾下的隨機文件in5.dat 中有20 條記錄，每條

記錄含姓名和三個分數(均為100 以內的正整數)。在程序

中已經定義了類型Recordtype，此類型變量可以存放一條記

錄。要求如下：

①請為“計算最大最小值”按鈕編寫Click 事件過程，

其功能是：讀取文件中的記錄，計算每人的總分，找出其中

最大總分和最小總分，分別放入變量maxval，minval 中(這

兩個變量已經給出，不得修改)。

②運行程序，單擊“計算最大最小值”按鈕后再單擊“存盤”按鈕。

注意：考生不得修改窗體文件中已經存在的控件和程

序，在結束程序運行之前，必須依次單擊“計算最大最小值”、

1