一、基本操作題

　　(1)在Form1的窗體上繪制一個圖片框，其名稱為Picture1。編寫適當的事件過程，使程序運行后，若單擊窗體，則從圖片框的(300，600)位置處開始顯示“Visual Basic”。程序運行情況如圖16-1所示。

　　注意：程序中不得使用任何變量。文件必須存放在考生文件夾中，工程文件名為sj1.vbp，窗體文件名為sj1.frm。

　　(2)在Form1的窗體上繪制一個文本框，名稱為Text1;繪制一個命令按鈕，名稱為Command1，標題為“顯示”，TabIndex屬性設為0。請為Command1設置適當的屬性，使得當焦點在Command1時，按Esc鍵就調用Command1的Click事件，該事件過程的作用是在文本框中顯示“VisualBasic程序設計”，程序運行結果如圖16-2所示。

　　注意：程序中不得使用任何變量;文件必須存放在考生文件夾中，工程文件名為sj2.vbp，窗體文件名為sj2.frm。

　　二、簡單應用題

　　(1)在考生文件夾中有一個工程文件sj3.vbp和一個窗體文件sj3.frm。窗體上有一個名為Text1的文件框，一個標題為“計算”、名稱為Command1的命令按鈕和一個組合框。請在名為Combo1的組合框中輸入3個列表項：“5”、“9”和“13”(列表項的順序不限，但必須是這3個數字)，程序運行情況如圖16-3所示。

　　請編寫適當的事件過程，使得程序運行時，在組合框中選定一個數字后，單擊“計算”按鈕，則計算4000以內能夠被該數整除的所有數之和，并放人Text1中。最后，按原文件名存盤(提示：由于計算結果較大，應使用長整型變量)。

　　注意：不得修改窗體文件中已經存在的程序，在結束程序運行之前，必須至少進行一次計算。必須用窗體右上角的關閉按鈕結束程序，否則無成績。

　　(2)在考生文件夾中有一個工程文件sj4.vbp及窗體文件sj4.frm。在名為Form1的窗體上有一個圓和一條直線(直線的名稱為Linel)構成一個鐘表的圖案;有兩個命令按鈕，名稱分別為Command1和Command2，標題分別為“開始”和“暫停”;還有一個名為Timer1的計時器。程序運行時，鐘表指針不動，單擊開始按鈕，則鐘表上的指針(即Line1)開始順時針旋轉(每秒轉6°，一分鐘轉一圈);單擊暫停按鈕，則指針暫停旋轉。運行時的窗體如圖16-4所示。請設置計時器的適當屬性，使得每秒激活計時器的Timer事件一次;編寫兩個按鈕的Click事件過程。文件中已經給出了所有控件和部分程序，不得修改已有程序和其他控件的屬性;編寫的事件過程中不得使用變量，且只能寫一條語句。最后，按原文件名并在原文件夾中保存修改后的文件。

　　注意：保存時必須存放到考生文件夾下，工程文件名為sj4.vbp，窗體文件名為sj4.frm。

　　三、綜合應用題

　　在考生文件夾下有文件in5.txt，文件中有幾行漢字。請在窗體Form1上繪制一個文本框，名稱為Text1，能顯示多行;再繪制一個命令按鈕，名稱為Command1，標題為“保存”。并編寫適當的事件過程，使得在加載窗體時，把in5.txt文件的內容顯示在文本框中，然后在文本的最前面手工插入一行漢字：“全國計算機等級考試”，如圖16-5所示。最后單擊“保存”按鈕，可以把文本框中修改過的內容存到文件out5.txt中。

　　注意：只能在最前面插入文字，不能修改原有文字。文件必須存放在考生文件夾中，以sj5.vbp為文件名存儲工程文件，以sj5.frm為文件名存儲窗體文件。

　　答案與解析

　　一、基本操作題

　　(1)本題主要考查圖片框控件的畫法和屬性設置，以及簡單的窗體事件的編寫。根據題意，新建“標準EXE”工程，在窗體上添加一個名稱為Picture1的圖片框，設計完成后，進入代碼窗口編寫如下代碼：

　　(2)命令按鈕的Cancel屬性返回或設置一個值，用來指示窗體中命令按鈕是否為取消按鈕，它有兩種取值：True和False。值為True時，命令按鈕不是窗體的取消按鈕，按Esc鍵與單擊該命令按鈕的作用相同;值為False時，命令按鈕是窗體的取消按鈕。

　　根據題意，新建“標準EXE”工程，在窗體上添加一個文本框，其名稱為“Text1”，一個命令按鈕，其名稱為Com-mand1、Caption屬性為“顯示”、Cancel屬性為“True”，TabIndex屬性為0。設置完成后雙擊Command1命令按鈕，編寫如下代碼：

　　二、簡單應用題

　　(1)組合框(ComboBox)將文本框與列表框的特性組合在一起，既可在組合框的文本框部分輸入信息，也可在列表框部分選擇項目;組合框的列表項可以在設計階段通過其List屬性加人，加入時注意每輸入完一項后按“Ctrl+Enter”組合鍵換行再輸入下一項，也可以通過代碼設置，AddItem方法用來向組合框中添加一個表項，其格式為：組合框.Additem列表項[索引]。

　　題目給出的源程序中已給設計好窗體，只需在Combo1的List屬性中添加“5”、“9”和“13”三個列表項，添加完成后，雙擊Command1進入代碼窗口，補充后的代碼如下：

　　(2)本題主要考查計時器控件和形狀控件的用法。計時器的Interval屬性用于設置每次觸發計時器的Timer事件的時間間隔，單位為毫秒。Enabled屬性控制計時器是否開始啟用，True表示啟用，False表示不啟用。形狀控件用來繪制各種形狀，其值有6種，0表示矩形，1表示正方形，2表示橢圓，3表示圓形，4表示圓角矩形，5表示圓角正方形。根據題意，將計時器的Interval屬性設為1000，雙擊Command1命令按鈕，進入代碼窗口，源程序給出的代碼如下：

　　三、綜合應用題

　　根據題意，在窗體上添加一個文本框控件，其名稱為Text1、MultiLine屬性為True，一個命令按鈕，其名稱為Command1、標題為“保存”。設置完成后，雙擊Command1命令按鈕進入代碼窗口，編寫如下代碼：