vb.net 教程 2-11 错误处理

一个软件,用着用着突然出现一个错误,然后不明不白地就退出了,
大家觉得使用者会怎么看这款软件?至少会认为这个软件做的不到家,太影响体验了。

因此,我们在设计软件的时候,需要尽量处理可能出现的错误,防止程序崩溃,避免影响用户体验。

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 教程 目录


阅读更多
版权声明:本文为博主原创文章,转载请显著位置标明出处,未经博主允许不得用于商业目的。 https://blog.csdn.net/UruseiBest/article/details/69352911
文章标签: vb.net 异常处理
个人分类: vb.net 教程
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

关闭
关闭
关闭