用鼠標雙擊窗體空白處,進入Form_Load事件過程,設(shè)置窗體的標題、Label1字體的大小、Command1和Command2的按鈕文字,具體代碼如下:
Private Sub Form_Load()
Form1.Caption = "我的第一個Visual Basic程序" '設(shè)置窗體的標題欄
Label1.FontSize = 32 '設(shè)置Label1字體的大小
Command1.Caption = "確定" '設(shè)置Command1按鈕文字
Command2.Caption = "退出" '設(shè)置Command2按鈕文字
End Sub
雙擊Command1,進入Command1_Click事件過程,設(shè)置Label1的Caption屬性為“我愛Visual Basic”,具體代碼如下:
Private Sub Command1_Click()
Label1.Caption = "我愛Visual Basic" '設(shè)置標簽內(nèi)容
End Sub
雙擊Command2,進入Command2_Click事件過程,使用End語句結(jié)束程序,具體代碼如下:
Private Sub Command2_Click()
End '退出程序
End Sub
代碼中的End是一個語句,主要用于結(jié)束程序,它提供了一種強迫中止程序的方法,該語句經(jīng)常用到,要牢記。
1.7.4 調(diào)試運行
程序編寫完成以后,需要對程序進行調(diào)試和運行,在進行調(diào)試時,出現(xiàn)了如圖1.33所示的變量未定義錯誤。
圖1.33 程序調(diào)試