[問(wèn)答題] 請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visaul Basic應(yīng)用程序(包括界面和代碼)。1．在窗體(名稱(chēng)為Form1)上畫(huà)1個(gè)列表框(名稱(chēng)為L(zhǎng)1)和1個(gè)水平滾
[問(wèn)答題] 請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)Visaul Basic應(yīng)用程序(包括界面和代碼)。
1．在窗體(名稱(chēng)為Form1)上畫(huà)1個(gè)列表框(名稱(chēng)為L(zhǎng)1)和1個(gè)水平滾動(dòng)條(名稱(chēng)為HS1，Min屬性為0，Max屬性為100，SmallChange屬性為2，LargeChange屬性為10)，編寫(xiě)適當(dāng)?shù)氖录^(guò)程。程序運(yùn)行后，如果把滾動(dòng)框移到某個(gè)位置，然后單擊窗體，則在列表框中顯示“滾動(dòng)條的當(dāng)前值是：xx”，如圖1—1所示，其中xx是滾動(dòng)框所在的位置。
存盤(pán)時(shí)，工程文件名為sjt1.vbp，窗體文件名為sjt1.frm。
2．在名稱(chēng)為Form1的窗體上畫(huà)一個(gè)文體框，其名稱(chēng)為T(mén)ext1，然后通過(guò)屬性窗口設(shè)置窗體和文本框的屬性，實(shí)現(xiàn)如下功能：
1)在文本框中可以顯示多行文本
2)在文本框中顯示垂直滾動(dòng)條
3)文本框中顯示的初始信息為“程序設(shè)計(jì)”
4)在文本框中顯示的字體為三號(hào)規(guī)則黑體
5)窗體的標(biāo)題為“設(shè)置文本框?qū)傩浴?。完成設(shè)置后的窗體如圖1—2所示。
要求：不編寫(xiě)任何代碼。
注意：存盤(pán)時(shí)必須存放在考生文件夾下，工程文件名為sjt2.vbp，窗體文件名為sjt2.frm。
正確答案：
按以下步驟操作： ① 啟動(dòng)Visual Basic，在窗體上畫(huà)1個(gè)水平滾動(dòng)條和1個(gè)列表框。 ② 按F4鍵，激活屬性窗口，在屬性窗口中設(shè)置滾動(dòng)條和列表框的屬性，見(jiàn)表1。 表 1 [*] ③ 編寫(xiě)窗體的Click事件過(guò)程； Private Sub Form_Click() L1.AddItem"滾動(dòng)條的當(dāng)前值是:" &HS1. Value End Sub2．① 對(duì)象主要屬性設(shè)置如表2所示。表 2 對(duì)象
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。