用鼠标双击窗体空白处,进入Form_Load事件过程,设置窗体的标题、Label1字体的大小、Command1和Command2的按钮文字,具体代码如下:
Private Sub Form_Load()
Form1.Caption = "我的第一个Visual Basic程序" '设置窗体的标题栏
Label1.FontSize = 32 '设置Label1字体的大小
Command1.Caption = "确定" '设置Command1按钮文字
Command2.Caption = "退出" '设置Command2按钮文字
End Sub
双击Command1,进入Command1_Click事件过程,设置Label1的Caption属性为“我爱Visual Basic”,具体代码如下:
Private Sub Command1_Click()
Label1.Caption = "我爱Visual Basic" '设置标签内容
End Sub
双击Command2,进入Command2_Click事件过程,使用End语句结束程序,具体代码如下:
Private Sub Command2_Click()
End '退出程序
End Sub
代码中的End是一个语句,主要用于结束程序,它提供了一种强迫中止程序的方法,该语句经常用到,要牢记。
1.7.4 调试运行
程序编写完成以后,需要对程序进行调试和运行,在进行调试时,出现了如图1.33所示的变量未定义错误。
图1.33 程序调试