word版可編輯-visualbasic程序設(shè)計(jì)實(shí)驗(yàn)指導(dǎo)書―資源采礦精精心整理doc(編輯修改稿)
2025-08-11 11:47 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 、實(shí)驗(yàn)原理VB程序開發(fā)原理五、實(shí)驗(yàn)步驟在窗體上添加一個(gè)單選框組(包含三個(gè)單選框,一個(gè)復(fù)選框組(包含三個(gè)復(fù)選框,兩個(gè)標(biāo)簽框。初始界面如圖2 61所示。 圖261 初始界面圖262 設(shè)置屬性后的界面,如表261所示。表261 設(shè)置屬性后的界面如圖262所示。Private Sub Check1_Click(index As IntegerDim k As StringDim i As Integerk = For i = 0 To 2If Check1( = 1 Thenk = k amp。 Check1( amp。 End IfNext ik = 你選擇了 amp。 k = kEnd SubPrivate Sub Option1_Click(index As IntegerDim i As IntegerFor i = 0 To 2If Option1( = True Then = 你選擇了 amp。 Option1(End IfNext iEnd Sub分別單選框中的某一項(xiàng)和復(fù)選框中的某幾項(xiàng),程序運(yùn)行效果如圖263所示。 圖263 運(yùn)行結(jié)果六、實(shí)驗(yàn)報(bào)告要求建立VB程序,正確實(shí)現(xiàn)單選框和復(fù)選框的應(yīng)用七、實(shí)驗(yàn)注意事項(xiàng)注意機(jī)房及計(jì)算機(jī)使用規(guī)范。八、思考題目哪些情況下會(huì)使用單選框,哪些情況會(huì)使用復(fù)選框?實(shí)驗(yàn)七: 組合框的應(yīng)用一、實(shí)驗(yàn)?zāi)康?。二、?shí)驗(yàn)內(nèi)容運(yùn)用組合框?qū)崿F(xiàn)內(nèi)容的添加與刪除功能。三、實(shí)驗(yàn)儀器、設(shè)備及材料硬件環(huán)境:PC軟件環(huán)境:操作系統(tǒng)Windows 系列Visual Basic 四、實(shí)驗(yàn)原理VB程序開發(fā)原理五、實(shí)驗(yàn)步驟在窗體上添加四個(gè)命令按鈕,一個(gè)標(biāo)簽,一個(gè)組合框和一個(gè)文本框。初始界面如圖271所示。 圖271 初始界面圖272 設(shè)置屬性后的界面,如表271所示。表271 屬性設(shè)置 設(shè)置屬性后的界面如圖Private Sub CmdAdd_Click( = End SubPrivate Sub CmdClear_Click(End SubPrivate Sub CmdDel_Click(Dim IntIndex As IntegerIntIndex = = Call Del(IntIndexEnd SubPrivate Sub CmdEnd_Click(EndEnd SubPrivate Sub Form_Load(With CboMsgAddItem 武漢大學(xué), 0AddItem 武漢科技大學(xué), 1AddItem 武漢理工大學(xué), 2AddItem 華中科技大學(xué), 3ListIndex = 0End WithEnd Sub 圖273 程序運(yùn)行結(jié)果六、實(shí)驗(yàn)報(bào)告要求建立VB程序,正確實(shí)現(xiàn)組合框的內(nèi)容應(yīng)用。七、實(shí)驗(yàn)注意事項(xiàng)注意機(jī)房及計(jì)算機(jī)使用規(guī)范。八、思考題目組合框的使用方法和環(huán)境。實(shí)驗(yàn)八: 圖像框的應(yīng)用一、實(shí)驗(yàn)?zāi)康?。二、?shí)驗(yàn)內(nèi)容將一個(gè)圖形文件放到圖像框中,改變圖像框的大小,觀察圖形是否隨之改變。三、實(shí)驗(yàn)儀器、設(shè)備及材料硬件環(huán)境:PC軟件環(huán)境:操作系統(tǒng)Windows 系列Visual Basic 四、實(shí)驗(yàn)原理VB程序開發(fā)原理五、實(shí)驗(yàn)步驟在窗體上添加五個(gè)命令按鈕和一個(gè)圖像框。初始界面如圖281所示。 圖281 初始界面圖282 設(shè)置屬性后的界面,如表281所示。表281 屬性設(shè)置 設(shè)置屬性后的界面如圖282所示。Private Sub Command1_Click( = / 2 = * 2End SubPrivate Sub Command2_Click( = / 2 = * 2End SubPrivate Sub Command3_Click( = / 2 = * 2 = * 2End SubPrivate Sub Command4_Click( = 2225 = 666 = 1515 = 1515End SubPrivate Sub Command5_Click(EndEnd Sub分別單擊五個(gè)命令按鈕,程序運(yùn)行效果如圖283 ~ 286所示。 圖283 改變寬度后運(yùn)行結(jié)果圖284 改變高度后運(yùn)行結(jié)果 圖285 改變高度和寬度后的運(yùn)行結(jié)果圖286 恢復(fù)原始尺寸六、實(shí)驗(yàn)報(bào)告要求建立VB程序,正確實(shí)現(xiàn)以上內(nèi)容。七、實(shí)驗(yàn)注意事項(xiàng)注意機(jī)房及計(jì)算機(jī)使用規(guī)范。八、思考題目圖像框的應(yīng)用方式和場(chǎng)合。實(shí)驗(yàn)九: 定時(shí)器一、實(shí)驗(yàn)?zāi)康?。二、?shí)驗(yàn)內(nèi)容編寫一個(gè)程序利用計(jì)時(shí)器計(jì)時(shí)。三、實(shí)驗(yàn)儀器、設(shè)備及材料硬件環(huán)境:PC軟件環(huán)境:操作系統(tǒng)Windows 系列Visual Basic 四、實(shí)驗(yàn)原理VB程序開發(fā)原理五、實(shí)驗(yàn)步驟在窗體上添加四個(gè)命令按鈕,一個(gè)標(biāo)簽,一個(gè)計(jì)時(shí)器控件。初始界面如圖291所示。 圖291 初始界面,如表291所示。表291 屬性設(shè)置 設(shè)置屬性后的界面如圖292所示 圖292 設(shè)置屬性后的界面Private Sub mand1_Click( = TrueEnd SubPrivate Sub Command2_Click( = FalseEnd SubPrivate Sub Command3_Click( = 0End SubPrivate Sub Command4_Click(EndEnd SubPrivate Sub Form_Load( = Format(Now, hh:mm:ssEnd SubPrivate Sub Timer1_Timer(Dim count As Longcount = count = count + 1 = countEnd Sub單擊“開始計(jì)時(shí)”命令按鈕,程序運(yùn)行效果如圖293所示。 圖293 程序運(yùn)行效果六、實(shí)驗(yàn)報(bào)告要求正確實(shí)現(xiàn)VB程序,完成實(shí)驗(yàn)中的要求七、實(shí)驗(yàn)注意事項(xiàng)注意機(jī)房及計(jì)算機(jī)使用規(guī)范。八、思考題目定時(shí)器的使用方法和特點(diǎn),以及所適
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號(hào)-1