用鼠標(biāo)雙擊窗體空白處，進(jìn)入Form_Load事件過程，設(shè)置窗體的標(biāo)題、Label1字體的大小、Command1和Command2的按鈕文字，具體代碼如下：

Private Sub Form_Load()

  Form1.Caption = "我的第一個Visual Basic程序" '設(shè)置窗體的標(biāo)題欄

  Label1.FontSize = 32 '設(shè)置Label1字體的大小

  Command1.Caption = "確定" '設(shè)置Command1按鈕文字

  Command2.Caption = "退出" '設(shè)置Command2按鈕文字

End Sub

雙擊Command1，進(jìn)入Command1_Click事件過程，設(shè)置Label1的Caption屬性為“我愛Visual Basic”，具體代碼如下：

Private Sub Command1_Click()

Label1.Caption = "我愛Visual Basic" '設(shè)置標(biāo)簽內(nèi)容

End Sub

雙擊Command2，進(jìn)入Command2_Click事件過程，使用End語句結(jié)束程序，具體代碼如下：

Private Sub Command2_Click()

  End '退出程序

End Sub

代碼中的End是一個語句，主要用于結(jié)束程序，它提供了一種強(qiáng)迫中止程序的方法，該語句經(jīng)常用到，要牢記。

1.7.4　調(diào)試運(yùn)行

程序編寫完成以后，需要對程序進(jìn)行調(diào)試和運(yùn)行，在進(jìn)行調(diào)試時，出現(xiàn)了如圖1.33所示的變量未定義錯誤。

圖1.33　程序調(diào)試