版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
一个软件,用着用着突然出现一个错误,然后不明不白地就退出了,
大家觉得使用者会怎么看这款软件?至少会认为这个软件做的不到家,太影响体验了。
因此,我们在设计软件的时候,需要尽量处理可能出现的错误,防止程序崩溃,避免影响用户体验。
vb.net提供两种方法处理错误
1、非结构化的异常处理,这也是早期的vb中使用的异常处理方法
On Error Goto 标签 发生错误时,跳转到标签位置
On Error Resume Next 发生错误时,忽略错误,继续执行错误后面的语句
出现错误后,就可以调用ErrObject类,来获得具体的信息。
Description 某个错误关联的描述性字符串
Number 返回或设置一个指定错误的数值
但我猜测为了衔接之前的vb,在程序中可以直接用Err。
下面的例子:
Sub main()
Dim a As Byte
Dim b As Byte
Dim c As Byte
Dim stra As String
Dim strb As String
On Error GoTo errcode
Console.WriteLine("请输入数字:")
stra = Console.ReadLine()
a = Byte.Parse(stra)
Console.WriteLine("请输入数字:")
strb = Console.ReadLine()
b = Byte.Parse(strb)
c = a + b
Console.WriteLine("a+b={0}", c.ToString)
Console.ReadKey()
Exit Sub
errcode:
Console.WriteLine("错误的输入{0}", Err.Description)
Console.ReadKey()
End Sub
当发生错误的时候,程序跳转到errcode标签所在代码。
注意,我们必须在errcode前面加上exit sub,否则即使没有发生错误也会执行errcode后面的语句。
可以看到,当输入的不是一个数字的时候,会产生一个错误,然后执行errcode后面的代码。
2、结构化的异常处理语句:
Try……Catch
常用的语句格式如下:
Try
可能出错的语句块
Catch 错误
错误处理语句块
End Try
我们来看下面的例子:
Sub main()
Dim a As Byte
Dim b As Byte
Dim c As Byte
Dim stra As String
Dim strb As String
Try
Console.WriteLine("请输入数字:")
stra = Console.ReadLine()
a = Byte.Parse(stra)
Console.WriteLine("请输入数字:")
strb = Console.ReadLine()
b = Byte.Parse(strb)
c = a + b
Console.WriteLine("a+b={0}", c.ToString)
Catch ex As Exception
Console.WriteLine("错误的输入")
End Try
Console.ReadKey()
End Sub
运行时如下:
输入的数值超出了byte范围,所以返回错误。
另外一种异常处理的语句格式
Try
可能出错的语句块
Catch 错误
错误处理语句块
Finally
语句块
End Try
当执行过程离开 Try...Catch 语句的任何部分时,总是会执行 Finally 中的语句块
下面的代码:
Sub main()
Dim a As Byte
Dim b As Byte
Dim c As Byte
Dim stra As String
Dim strb As String
Try
Console.WriteLine("请输入数字:")
stra = Console.ReadLine()
a = Byte.Parse(stra)
Console.WriteLine("请输入数字:")
strb = Console.ReadLine()
b = Byte.Parse(strb)
c = a + b
Console.WriteLine("a+b={0}", c.ToString)
Catch ex As Exception
Console.WriteLine("错误的输入")
Finally
Console.WriteLine("必须经过此步骤")
End Try
Console.ReadKey()
End Sub
不管出没有出错,都会输出 “必须经过此步骤”。
在Try……Catch语句中还可以使用 Exit Try ,跳出Try语句,当然,跳出后还是要执行Finally中的语句块
Try后面还可以接多个Catch语句,对不同的错误进行不同的处理。如下代码:
Sub main()
Dim a As Single
Dim b As Single
Dim stra As Byte
Dim strb As Byte
Dim flagErr As Boolean = False
Do
Try
Console.WriteLine("请输入被除数:")
stra = Console.ReadLine()
a = Byte.Parse(stra)
Console.WriteLine("请输入除数:")
strb = Console.ReadLine()
b = Byte.Parse(strb)
Dim c As Byte
c = a + b
Console.WriteLine("a+b={0}", c.ToString)
flagErr = False
Catch ex As OverflowException
Console.WriteLine("发生溢出" & ex.Message)
flagErr = True
Catch ex As InvalidCastException
Console.WriteLine("转换失败" & ex.Message)
flagErr = True
Catch ex As Exception
Console.WriteLine("错误的输入")
flagErr = True
End Try
Loop Until flagErr = False
Console.ReadKey()
End Sub
运行时如下:
运行时,输入2222,产生OverflowException错误,输入aaa,产生了InvalidCastException错误,当然如果还有其他错误,还会引发Exception,也能够处理。
具体有哪些错误,请参阅msdn,Exception 类。
另外,Try……Catch语句可以嵌套使用,比如
Try
可能出错的语句块
Try
可能出错的语句块
Catch 错误
错误处理语句块
End Try
Try
可能出错的语句块
Catch 错误
错误处理语句块
End Try
Catch 错误
错误处理语句块
End Try
vb.net在处理的时候,先检查包含该错误的最里面的Catch,如果没有找到匹配的Catch语句,那就再继续搜索外层的Catch语句。
相比非结构化的异常处理,个人认为结构化的异常处理更简洁方便使用,避免了跳转出错的可能。大家在代码中尽量使用Try……Catch。
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看 vb.net 教程 目录