一、基本操作題
請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visual Basic應(yīng)用程序(包括界面和代碼)。
(1)在名稱為Form1的窗體上放置兩個(gè)列表框,名稱分別為L(zhǎng)ist1和List2。在List1中添加“Item1”…“Item6”,并設(shè)置MultiSelect屬性為2(要求在控件屬性中設(shè)置實(shí)現(xiàn))。
再放置一個(gè)名稱為Command1、標(biāo)題為“導(dǎo)出”的命令按鈕。程序運(yùn)行后,如果單擊“導(dǎo)出”按鈕,將List1中選中的內(nèi)容(至少三項(xiàng))復(fù)制到List2中,并將對(duì)應(yīng)的項(xiàng)從List1中刪除。如果選擇的項(xiàng)數(shù)少于3項(xiàng),用消息框提示“請(qǐng)選擇至少3項(xiàng)”,如圖3-1所示。
注意:保存時(shí)必須存放在考生文件夾下,窗體文件名為sj1.frm,工程文件名為sj1.vbp。
(2)在名稱為Form1的窗體上放置一個(gè)名稱為Text1的文本框。程序運(yùn)行后,用戶在文本框中輸入的英文字母一律用小寫顯示。如圖3-2所示。
注意:保存時(shí)必須存放在考生文件夾下,窗體文件名為sj2.frm,工程文件名為sj2.vbp。
二、簡(jiǎn)單應(yīng)用題
(1)在考生文件夾下有工程文件sj3.vbp及窗體文件sj3.frm,該程序是不完整的。在窗體上有一個(gè)標(biāo)簽數(shù)組,名稱為L(zhǎng)abel1,該數(shù)組有4個(gè)控件元素,標(biāo)題分別是“文本編輯”“程序運(yùn)行”“移動(dòng)窗體”和“雙向箭頭”。運(yùn)行界面如圖3-3所示。在程序運(yùn)行后,將鼠標(biāo)移動(dòng)到各控件元素上,則鼠標(biāo)的形狀將變成各控件元素的標(biāo)題所代表的鼠標(biāo)形狀,離開控件元素,則又變成正常情況下的箭頭形狀。
注意:請(qǐng)?jiān)谟小?”的地方填入正確內(nèi)容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。存盤時(shí)不得改變文件名和文件夾。
(2)在考生文件夾下有工程文件sj4.vbp,窗體文件sj4.frm,該程序是不完整的。在窗體上有一個(gè)名為Text1的文本框,有兩個(gè)命令按鈕,名稱分別是Command1和Command2、標(biāo)題分別是“讀人數(shù)據(jù)”和“計(jì)算保存”,如網(wǎng)3-4所示。要求程序運(yùn)行后,單擊Command1按鈕,將文本文件in4.txt中的所有數(shù)字讀到數(shù)組a中,并在文本框內(nèi)顯示出來(lái)。隨后Command1按鈕變?yōu)闊o(wú)效。然后單擊Command2按鈕,求出數(shù)組a中的各元素的立方并賦值回相應(yīng)的元素,例如a(1)=2,則新a(1)=a(1)*a(1)*a(1)=8。把計(jì)算后的數(shù)組的值全部寫入考生文件夾下的文本文件out4.txt中,并在文本框中顯示出來(lái),最后Command2按鈕也變?yōu)闊o(wú)效。
注意:請(qǐng)?jiān)谟小?”的地方填入正確內(nèi)容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。修改后的工程及窗體文件,均以原名保存在考生文件夾下。
三、綜合應(yīng)用題
在考生文件夾下有工程文件sj5.vbp及窗體文件sj5.frm,該程序是不完整的。在名稱為Form1、標(biāo)題為“支持率”的窗體上,有4個(gè)Picture控件、4個(gè)Label控件和5個(gè)Command控件。具體描述如下:
Pic1和Pic2分別為Person1和Person2的紅色,Pic3和Pic4為綠色;Pic1和Pic3重疊,Pic2和Pic4重疊。單擊Command1和Command3按鈕時(shí),Labe2和label4減少。當(dāng)Labe2或Label4的值為0時(shí),相對(duì)應(yīng)的Command1和Command3按鈕失效(變灰);按Command2和Command4時(shí),Label2和Label4增加;Command5是關(guān)閉程序。程序啟動(dòng)時(shí)兩者均為綠色,兩人當(dāng)中票數(shù)高的是紅色,另一個(gè)是綠色,如圖3-5所示。如果兩者的票數(shù)一樣高,則兩者都為紅色。
注意:請(qǐng)?jiān)谟小?”的地方填入正確內(nèi)容,然后刪除“?”及代碼前的所有注釋符“'”,但不能修改其他部分。存盤時(shí)不得改變文件名和文件夾。
![]() | ![]() .. 定價(jià):¥225 優(yōu)惠價(jià):¥213 更多書籍 |
![]() | ![]() .. 定價(jià):¥133 優(yōu)惠價(jià):¥133.0 更多書籍 |