华南俳烁实业有限公司

　　基本操作題，請根據(jù)以下各小題的要求設(shè)計Visual Basic應(yīng)用程序(包括界面和代碼)

　　1、(1)在窗體Form1中繪制一個名稱為Text1、內(nèi)容空的文本框和一個名稱為Command1、標題為“大寫”的命令按鈕。要求程序運行時，在文本框中輸入英文字母，單擊“大寫”，文本框中的字母全部以大寫字母顯示。程序代碼中不得使用任何變量。程序運行的效果如圖53-1所示。

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

　　(2)在名為Form1的窗體上繪制一個容器，名稱為Frame1，標題為“框架”、高度為2400、寬度為2000;再在容器中繪制一個標簽，名稱為Label1、高度為500、寬度為1200，其位置距容器的左邊框300，距容器的上邊框800，標簽中的初始內(nèi)容設(shè)置為“模擬試題”，BorderStyle屬性為2。只建立控件，不必定義其事件過程。程序運行時的窗體界面如圖53-2所示。

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

　　2、(1)在名稱為Form1的窗體上建立一個名稱為Command1、標題為"輸出"的命令按鈕，再建立一個名稱為Text1的文本框，字體為四號、常規(guī)、黑體，編寫適當?shù)氖录�過程，要求程序運行后，如果單擊"輸出"命令按鈕，則在文本框上顯示"模擬考試"，如圖11-1所示。程序中不能使用任何變量，直接顯示字符串。

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

　　(2)在名稱為Form1的窗體上畫一個標簽，名稱為Label1，邊框?qū)傩詾?;再畫一個命令按鈕，名稱為Command1，標題為"最右端"，運行界面如圖11-2所示。請編寫適當?shù)氖录�過程，使運行界面在運行時，單擊"最右端"按鈕，則標簽水平移動到窗體的最右端。程序中不得使用任何變量。

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

　　3、(1)在名稱為Form1的窗體上畫一個空白文本框，名稱為Text1，它的高為2000，寬為2000。通過屬性窗口設(shè)置適當?shù)膶傩允沟肨ext1可以顯示多行文本，且有垂直滾動條。程序運行時的窗體如圖32-1所示。

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

　　(2)在名稱為Form1的窗體上畫一個圖像框，名稱為Image1，其高、寬分別為800、800，通過屬性窗口把考生文件夾下的圖像文件test.bmp裝入圖像框;再畫一個命令按鈕，名稱為Command1，標題為“變寬”。請編寫適當?shù)氖录�過程，要求程序運行后，每單擊一次“變寬”按鈕，則使圖像的寬度增加600。程序運行時窗體界面如圖32-2所示。

　　注意：存盤時必須存放在考生文件夾下，工程文件名為sj2.vbp，窗體的文件名為sj2.frm。

　　4、(1)在窗體Form1上畫一個命令按鈕，名稱為Command1，標題為“打開文件”，在窗體上添加適當?shù)目丶�并編寫適當?shù)某绦虼�碼，要求程序運行時，單擊“打開文件”命令按鈕，可以彈出“打開文件”對話框。程序運行時的窗體界面如圖65-1所示。

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

　　(2)在窗體Form1上畫一個列表框，名稱為List1，有“Item1”、“Item2”、“Item3”和“Item4”4個表項。要求編寫適當?shù)某绦虼�碼，當雙擊列表中某一項時，彈出一個對話框提示“是否刪除”。對話框中只有“是”與“否”兩個選擇按鈕，單擊按鈕，則繼續(xù)當前的操作。程序運行時的窗體界面如圖65-2所示。

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

　　5、請根據(jù)以下各小題的要求設(shè)計VisualBasic應(yīng)用程序(包括界面和代碼)。

　　(1)在名稱為Form1的窗體上放置一個名稱為Drive1的驅(qū)動列表框控件、一個名稱為Dir1的目錄列表框控件和一個名稱為File1的文件列表框控件。程序運行時，可以對系統(tǒng)中的文件進行瀏覽，如圖70-1所示。

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

　　(2)在名稱為Form1的窗體上放置一個名為Label1的標簽控件和一個名為Timer1的計時器控件，程序運行后，文本框中顯示的是當前的時間，而且每一秒文本框中所顯示的時間都會隨時間的變化而改變，并且顯示的字體為四號宋體字，如圖70-2所示。

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

　　簡單應(yīng)用題

　　6、(1)在考生文件夾下有一個工程文件sj3.vbp，相應(yīng)的窗體文件為sj3.frm。其功能是在Text1文本框中輸入一個數(shù)N，單擊命令按鈕計算從0到N的所有素數(shù)的和，并在Text2中顯示出來。運行程序如圖67-3所示。

　　注意：去掉程序中的注釋符“'”，把程序中的“?”改為正確的內(nèi)容，使其實現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。

　　(2)在考生文件夾下有工程文件Sj4.vbp及窗體文件sj4.frm，該程序是不完整的。本程序的功能為當用戶單擊窗體上的命令按鈕“輸入”時，可以輸入6個數(shù)值，隨后程序?qū)�這6個數(shù)值進行升序排序，單擊按鈕“輸出”則把大于平均值的數(shù)顯示出來，程序運行時的窗體如圖67-4所示。

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

　　7、(1)在窗體上畫兩個單選按鈕，名稱分別為Op1和Op2，標題分別為“黑體”和“楷體”;一個文本框，名稱為Text1，字體為宋體，字號為四號字;有一個命令按鈕，名稱為C1，標題為“切換”。要求程序運行后，在文本框中輸入“等級考試”，并選擇一個單選按鈕，如圖55-4所示。在單擊“切換”按鈕后，會根據(jù)所選的單選按鈕來切換文本框中所顯示的漢字字體，如圖55-5所示。

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

　　(2)在考生文件夾中有一個工程文件sj4.vbp，相應(yīng)的窗體文件名為sj4.frm。請在名為Form1的窗體上繪制一個名稱為Text1的文本框和一個名稱為Cmd1、標題為“大小寫轉(zhuǎn)換”的命令按鈕，如圖55-6，55-7所示。

　　如圖55-6，55-7所示，在程序運行時，單擊“大小寫轉(zhuǎn)換”按鈕，可以把Text1中的大寫字母轉(zhuǎn)換為小寫，把小寫字母轉(zhuǎn)換為大寫。窗體文件中已經(jīng)給出了“大小寫轉(zhuǎn)換”按鈕的Click事件過程，但不完整，請去掉程序中的注釋符“”’，把程序中的問號“?”改為正確的內(nèi)容。

　　注意：不能修改程序的其他部分。最后，按原文件名并在原文件夾中保存修改后的文件。

　　8、(1)在名為Form1的窗體上建立兩個主菜單，其標題分別為"文件"和"幫助"，名稱分別為vbFile和vbHelp，在"文件"菜單下有3個菜單項，分別為"新建"、"打開"和"保存"(其名稱分別為vbNew、vbOpen和vbSave)。要求程序運行后，如果選中"文件"下的某個菜單項，則將該菜單項的標題通過MsgBox對話框顯示出來，如圖50-3所示。

　　注意：文件必須存放在考生文件夾中，窗體文件名為sj3.frm，工程文件名為sj3.vbp。

　　(2)在名為Form1的窗體上建立一個文本框，名為Text1;再建立一個命令按鈕，名為Cmd1，標題為"計算"，如圖50-4所示。

　　要求程序運行后，單擊命令按鈕，則計算出100～200所有素數(shù)之和，并在文本框中顯示結(jié)果，同時把結(jié)果存入文件out48.txt中(在考生文件夾中有標準模塊mode.bas，其中的PutData過程可以把結(jié)果存入文件;而isprime函數(shù)可以判斷整數(shù)X是否為素數(shù)，如果是素數(shù)，則函數(shù)返回True，否則返回False;考生可以把該模塊文件添加到自己的工程中)。

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

　　9、(1)在考生文件夾下有工程文件sj3.vbp與窗體文件sj3.frm，該程序和窗體是不完整的。請在窗體上設(shè)置一個標簽，名稱為Labe11，標題為"計算1/2一1/3+1/4一1/5+1/6的值";另設(shè)一個文本框與一個命令按鈕。命令按鈕的名稱為Command1、標題為"計算";文本框的名稱為Text1，用于顯示結(jié)果，并初始化為空。然后編寫相應(yīng)的代碼，要求運行程序時，單擊"計算"按鈕，程序可以計算出1/2一1/3+1/4一1/5+1/6的值，并將結(jié)果顯示在文本框中，如圖46-3所示。

　　注意：考生完成程序編寫后，將工程文件與窗體文件按原文件名保存到考生文件夾下，不得更改程序的其他部分，否則可能無成績。

　　(2)新建一個工程文件，在名稱為Form1的窗體上建立兩個名稱分別為Command1和Command2、標題分別為"平均分"和"清空"的命令按鈕;一個名為Text1的文本框。要求程序運行后，單擊"平均分"按鈕，可通過輸入對話框輸入7個整數(shù)，去掉最大的和最小的然后求平均分，將結(jié)果在文本框中顯示出來。如果單擊"清空"按鈕，則將文本框清空。在程序中不得使用任何其他變量。程序運行時的窗體界面如圖46-4所示。

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

　　10、(1)在窗體上設(shè)置兩個標簽，名稱分別為Label1與Label2、標題分別為"當前時間為："和空;要求當單擊窗體時，Label2顯示當前時間。請編寫相應(yīng)的程序代碼來完成這個功能。程序運行時的窗體界面如圖41-3所示。

　　注意：要求考生在編寫完程序后，把工程文件與窗體文件保存到考生文件夾下，文件名分別為sj3.vbp與sj3.frm。

　　(2)在考生文件夾下有工程文件sj4.vbp及窗體文件sj4.frm，該程序是不完整的。本程序的功能是利用隨機數(shù)函數(shù)模擬投幣，方法是：每次隨機產(chǎn)生一個0或1的整數(shù)，相當于一次投幣，1代表正面，0代表反面。在窗體上畫3個名稱分別為Text1、Text2和Text3的文本框與一個名稱為Command1的命令按鈕，其中Command1的標題為"開始"。文本框分別用于顯示用戶輸入投幣總次數(shù)、出現(xiàn)正面的次數(shù)和出現(xiàn)反面的次數(shù)。程序運行后，在文本框Text1中輸入總次數(shù)，然后單擊"開始"按鈕，按照輸入的次數(shù)模擬投幣，分別統(tǒng)計出現(xiàn)正面、反面的次數(shù)，并顯示結(jié)果。如圖41-4所示。

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

　　綜合操作題

　　11、在考生文件夾中有工程文件sj5.vbp及其窗體文件sj5.frm，該程序是不完整的。在名稱為Form1的窗體上有兩個命令按鈕，名稱分別為Command1和Command2、標題分別為"讀取數(shù)據(jù)"和"保存"，一個文本框，名稱為Text1、MultiLine屬性為True、ScrollBars屬性為2;要求如果單擊"讀取數(shù)據(jù)"按鈕，則讀入in.txt文件中的50個整數(shù)，放人一個數(shù)組中，同時在文本框中顯示出來;如果單擊"保存"按鈕，則計算數(shù)組中小于300或大于或等于800的所有數(shù)之和，把求和結(jié)果在文本框Text1中顯示出來，如圖12-5所示。同時把結(jié)果存人考生文件夾中的文件out.txt中。(在mode.has中的WriteData過程可以把結(jié)果存入out.txt文件)

　　注意：請在有"?"的地方填入正確內(nèi)容，然后刪除"?"及代碼前的所有注釋符"'"但不能修改其他部分。存盤時不得改變文件名和文件夾。文件必須存放在考生文件夾下，窗體文件名為sj5.frm，工程文件名為sj5.vbp，計算結(jié)果存入out.txt文件中，否則沒有成績。

　　12、在考生文件夾下有工程文件sj5.vbp及窗體文件sj5.frm，該程序是不完整的。在名稱為Form1的窗體上有3個Label控件和2個命令按鈕，命令按鈕的名稱為Command1與Command2，標題為"讀取"與"保存并退出"。考生文件夾下的數(shù)據(jù)文件in5.txt存放一些字符。要求程序運行時，按"讀取"按鈕后，從考生文件夾下的in5.txt中讀出數(shù)據(jù)并識別出其中的非字母元素，按"保存并退出"按鈕后，將非字母元素寫入考生文件夾下的out5.txt文件中(以標準格式在一行中輸出);執(zhí)行完畢，"讀取"按鈕變成"完成"，且無效(變灰)，單擊"保存并退出"按鈕，程序結(jié)束，如圖49-5所示。

　　注意：請將程序代碼補充完整，但不能修改其他部分。存盤時不得改變文件名和文件夾，相應(yīng)的txt文件也保存到考生文件夾下，否則沒有成績。

　　13、在考生目錄下有一個工程文件sj5.vbp，其窗體上有兩個標簽L1和L2，標題分別為"口令"和"允許次數(shù)";一個命令按鈕C1，標題為"確定";兩個文本框，名稱分別為Text1和Text2。其中Text1用來輸入口令(輸入時，文本框內(nèi)容顯示"*")，初始內(nèi)容為空;Text2的初始內(nèi)容為3。并給出了C1的事件過程，但不完整，要求去掉程序中的注釋符"'"，把程序中的"?"改為正確的內(nèi)容，使得程序運行時，在Text1中輸人口令后，單擊"確定"，如果輸入的是"123456"則在Text1中顯示"口令正確";如果輸入其他內(nèi)容，單擊"確定"后，彈出錯誤提示對話框(如圖8-6所示)，并且Text2中的數(shù)字減1。最多可輸入3次口令，若3次都輸入錯誤，則禁止再次輸入。

　　注意：不能修改程序中的其他部分。最后將修改后的文件按原文件名存盤。

　　14、在考生文件夾下有一個工程文件sj5.vbp，窗體上有一個文本框，名稱為Text1，可以多行顯示。還有三個命令按鈕，名稱分別為Command1、Command2和Command3，標題分別為“讀取數(shù)據(jù)”、“顯示并保存奇數(shù)”和“顯示并保存偶數(shù)”�！白x取數(shù)據(jù)”按鈕的功能是把考生文件夾下的in5.dat文件中的50個整數(shù)讀到數(shù)組中，并在Text1中顯示出來;“顯示并保存奇數(shù)”和“顯示并保存偶數(shù)”按鈕的功能是把50個數(shù)按要求保存到考生文件夾下的out51.dat和out52.dat文件中。單擊“讀取數(shù)據(jù)”命令按鈕后，程序運行時的窗體界面如圖52-5所示。

　　注意：在窗體中已經(jīng)給出了全部控件和部分程序，要求閱讀程序并去掉程序中的注釋符“'”，把程序中的“?”改為正確的內(nèi)容，使其實現(xiàn)上述功能，但不能修改程序中的其他部分，也不能修改控件的屬性。最后把修改后的文件按原文件名存盤。

　　15、在考生文件夾下有一個工程文件sj5.vbp，程序代碼中已經(jīng)寫入部分代碼，要求根據(jù)下面的描述在窗體模塊中定義3個名稱分別為readdata1、readdata2和WriteData的Sub過程。請先裝入工程文件sj5.vbp，然后完成以下操作：在名稱為Form1的窗體上畫3個命令的按鈕，其名稱為Command1、Command2和Command3，標題分別為"讀取數(shù)據(jù)"、"計算"和"存盤"。程序運行后，如果單擊"讀取數(shù)據(jù)"按鈕，則讀人in1.txt和in2.txt文件中的各25個整數(shù)，分別放人a1和a2兩個數(shù)組中：如果單擊"計算"按鈕，則把兩個數(shù)組中對應(yīng)下標的元素相加，其結(jié)果放人第3個數(shù)組中(即：第一個數(shù)組的第n個元素加上第2個數(shù)組的第n個元素，其結(jié)果作為第3個數(shù)組的第12個元素。這里的n為1，2….，25)，然后計算第3個數(shù)組各元素之和，并把所求得的和在窗體上顯示出來;如果單擊"存盤"按鈕，則把所求得的和存人考生文件夾的out5.txt文件中。程序運行時的窗體界面如圖47-5所示。

　　注意：考生只需添加必要的控件，并將程序代碼補充完整，使其實現(xiàn)上述功能即可�？忌�不得修改窗體文件中已經(jīng)存在的程序，必須把求得的結(jié)果用"存盤"按鈕存入考生文件文件夾下的out5.txt文件中，否則沒有成績。存盤時，工程文件名仍為sj5.vbp，窗體文件名仍為sj5.frm。