編寫Change事件過程如下:
Private Sub Textch_Change()
LabCh.Caption=TexCh.Text
End Sub
再編寫按鈕的Click事件過程如下:
Private Sub comClear Click()
TexCh.Text=""
End Sub
運行該程序,在文本框中輸入內(nèi)容,則窗體上就會同步顯不出用戶所輸入的內(nèi)容,改變文本框中的內(nèi)容,則窗體上的內(nèi)容也會隨著改變。圖5.29所示的是在文本框中輸入"清華大學(xué)計算機系"后的情形。單擊【清除】按鈕,則文本框中的內(nèi)容被清除,并且窗體中的的內(nèi)容也被清除,如圖5.30所示。
盡管在ComClear_Click事件過程中只有清除文本框中內(nèi)容的語句,但由于在文本框中的內(nèi)容被清除后,觸發(fā)了它的Change事件,因此,單擊【清除】按鈕后,Change事件過程也被執(zhí)行了。
相關(guān)推薦:
2010年9月計算機等級考試成績查詢時間匯總
2011計算機等級考試二級VB考點及習(xí)題匯總
2011年計算機等級考試二級VB復(fù)習(xí)指導(dǎo)匯總
2011年上半年計算機等級考試報名時間匯總