1.7 我的第一个Visual Basic程序(3)

用鼠标双击窗体空白处,进入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 程序调试

读书导航