VB2008入门教程：[11]

VB2008入门教程：[11]

在本节课中我们将学习如何为程序创建基本的错误处理代码。

具体格式：

Try

代码1 若此代码运行正常，则跳过代码2，执行代码3

Catch 若此代码运行错误，则执行代码2，再执行代码3

代码2

Finally

代码3

End Try

按照之前的方法新建一个项目，并命名为Catch，然后单击“确定”。

将一个【文本框】控件和一个【按钮】控件从【工具箱】中拖动到窗体上。

双击该【按钮】控件以打开编辑器

在 Button1_Click 事件处理程序中，键入以下代码。

Try

Dim aNumber As Double = CDbl(Textbox1.Text)

MsgBox("You entered the number " & aNumber)

Catch

MsgBox("Please enter a number.")

Finally

MsgBox("Why not try it again?")

End Try

调试并运行程序。

在文本框中，键入一个数值，然后单击按钮。键入的数值出现在一个消息框中，

紧接着出现一个邀请，请您再试一次。

接下来，在文本框中键入一个非数值，如一个单词，然后单击按钮。这一次，当程序试图将文本框中的文本转换为一个数字时，将无法执行并会发生错误。这时将会执行 Catch 块而不是继续执行完 Try 块中的代码，而且一个消息框会提示您键入一个数字。然后执行 Finally 块并邀请您再试一次。

在本课中，我们学习了如何使用 Try...Catch...Finally 块创建一个基本的错误处理结构。截止到本课，关于 Visual Basic 语言的介绍就结束了。在后续课程中，我们将学习如何为程序创建用户界面。