版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
一个软件,用着用着突然出现一个错误,然后不明不白地就退出了,
大家觉得使用者会怎么看这款软件?至少会认为这个软件做的不到家,太影响体验了。

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

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教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。

vb.net 教程 2-11 错误处理相关推荐

  1. vb.net 教程 1-1 从 hello world 开始

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 各个语言最先介绍的就是hello world,这似乎成了惯例. 我们也先从这个简单的代码开始. ...

  2. vb程序设计教程第4版龚沛曾 实验答案解析

    这里只是个人对书中题目的解答,并不代表最优代码.仅供参考.有哪里错误或者不足的地方还望指出,Thanks♪(・ω・)ノ 以及 不要脸地 求探讨求点赞.嘿嘿 这里使用的是<vb程序设计教程(第四版 ...

  3. vb.net 教程 20-4 库存管理系统2 数据库架构

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的.     关于<Visual Basic.Net 循序渐进>请到百度网盘下载,具体下载 ...

  4. vb.net 教程 3-4 窗体编程 公共控件4 MaskedTextBox

    9.MaskedTextBox 掩码文本框?实际上就是使用设定的格式来控制文本输入的文本框. 重要属性: PromptChar:表示在掩码文本框中需要用户填充的位置使用什么字符 Mask:设置用户输入 ...

  5. 全国计算机二级vb 文库,全国计算机等级考试二级VB基础教程电子教案.ppt

    全国计算机等级考试二级VB基础教程电子教案.ppt ,Visual Basic程序设计基础教程 电子教案,制作人曾强聪,2004 年 4 月,课程内容,第 1 章,第 2 章,第 3 章,第 4 章, ...

  6. vb.net 教程 3-4 窗体编程 公共控件6 PictureBox ProgressBar

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 11.PictureBox 重要属性: SizeMode :设置图片在图片框中显示方式:  Au ...

  7. vb.net 教程 20-4 库存管理系统3.14 出库单操作(FormStorageOutOrder)

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的.   关于<Visual Basic.Net 循序渐进>请到百度网盘下载,具体下载地址 ...

  8. vb.net 教程 3-2 窗体编程之窗体 4

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 本节继续谈谈窗体传递参数 假设我要将Form1中的数据传递到Form2,可以采用以下方法: 首先 ...

  9. vb.net 教程 3-2 窗体编程之窗体 1

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 个人理解:windows系统是消息驱动型的系统,消息带来事件,事件引发处理. 比如按下按钮消息, ...

  10. vb.net 教程 2-9 过程

    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 过程,也或直接称为方法.函数. Sub过程(子过程)和Function(函数过程) 基本的语法: ...

最新文章

  1. 手把手带你复现ICCV 2017经典论文—PyraNet
  2. android volley 上传图片 和参数,Android使用Volley上传文件
  3. 如何更有价值采集数据、高效分析数据?
  4. UICamera(NGUI Event system)原理
  5. python 单位根检验代码_python时间序列分析
  6. 【南邮操作系统实验】页面置换算法(FIFO、LRU、OPT) Python 版
  7. delphi glsence 教程
  8. dos攻击防范 java_php DOS攻击实现代码(附如何防范)
  9. 剑桥口语 — 48 个音标标准口型与细节发音
  10. AVI文件在opencore框架下的解析
  11. photoshop cs6中画虚线的设置
  12. (DINO) Emerging Properties in Self-Supervised Vision Transformers——自监督ViT的新属性和几点思考
  13. 零知识 QAP 问题的转化
  14. 增长率超 100%!东软数据可视化到底什么样?
  15. 论文笔记:联邦学习——Federated Learning: Strategies for Improving Communication Efficiency
  16. 对接阿里云短信平台报错
  17. opencv神经网络库之SVM和ANN_MLP的使用【 OpenCV 技能树评测】
  18. 学习Linux的第五课时
  19. RunAsDate 1.01
  20. 注册表中shell文件不见了_win7系统误删注册表的shell文件导致无法打开文件的解决方法...

热门文章

  1. Maxon伺服驱动EPOS2 24/5 配置
  2. python json对比差异,更新json数据
  3. 计算机控制技术电子课件,电子科技大学计算机控制技术课件04.ppt
  4. gbk、utf-8,这都是啥玩意儿? “Python编码“ 最全的教程来了
  5. 华为服务器虚拟化和存储虚拟化中标,idc服务器虚拟化排名
  6. EZ-webshell
  7. 公钥,私钥,对称密钥
  8. office :word ppt excel 取消加载 有道翻译,有道云笔记插件
  9. 物联网行业网络解决方案_不同行业的物联网挑战
  10. 糖葫芦低通滤波器的设计