VB入門教程之四

2019-11-18 17:54:13

字體：大中小

供稿：網(wǎng)友

第四章　按鈕（一）

　　從本章開始我們將正式進(jìn)入VB的編程世界，但這還僅僅是個(gè)開端，要編出功能強(qiáng)大的軟件，還要學(xué)很多東西，那就要看以后的VB高級(jí)教程了，我也得努力學(xué)啊！

　　按鈕是我們?cè)赪indows操作見到最多的控件，它們有著各種各樣的功能：“確認(rèn)”、“取消”、“下一步”等等，這些都是按鈕的表現(xiàn)，另外還有很多圖形話的按鈕，其實(shí)它們并沒什么不同，所有的按鈕都是通過單擊（click）事件實(shí)現(xiàn)的，只不過是在外表不同罷了。下面就讓我們建立一個(gè)最簡(jiǎn)單的按鈕，雙擊工具箱的CommandButton，將在窗體上建立一個(gè)形如圖4－1的按鈕，它的缺省名（Name屬性）為Command1，我們可以把它改名為cmdExit，把Caption屬性設(shè)為“退出”，然后雙擊，按鈕填寫代碼：

　　Command1.Caption="復(fù)原"

　　Else

　　Text1.Text=StoreString

　　Command1.Caption="清除"

　　EndIf

　　EndSub

　　同樣可以上面的功能，但是卻少用了一個(gè)控件，控件使用少的程序啟動(dòng)會(huì)快些。

　　下面的例子要更加復(fù)雜些，大家一定都用過Windows附件中的計(jì)算器，它是一個(gè)標(biāo)準(zhǔn)的科學(xué)計(jì)算器，利用VB我們也可以做到，只是沒有那么復(fù)雜，四則運(yùn)算而已。

　　先建立一個(gè)新的項(xiàng)目文件，里面包含一個(gè)Form1的窗體。然后，添加控件，包括一個(gè)Text框（Text1），和17個(gè)按鈕，這17個(gè)按鈕使用的名稱都是Command1，只是Index屬性不同，就好象一個(gè)數(shù)組，創(chuàng)立一組按鈕的方法是，先在窗體上建立一個(gè)按鈕（Command1），然后在Command1上擊鼠標(biāo)右鍵，選擇復(fù)制（Copy），然后在窗體上任意部位擊右鍵，選擇粘貼（Paste），系統(tǒng)會(huì)提示是否創(chuàng)建控件組，選擇“是”，重復(fù)上面步驟，直至創(chuàng)立17個(gè)按鈕為止。各控件屬性如下表：

　　Text1

　　BackColor＝&H00C0FFFF&

　　Text＝“0.”

　　Command1

　　Index0DD16

　　Index0DD9Caption=“0”－“9”

　　Index10Caption=“.”

　　Index11Caption=“=”

　　Index12Caption=“ ”

　　Index13Caption=“-”

　　Index14Caption=“×”

　　Index15Caption=“÷”