VB.NET 异常处理

17 Mar 2025 | 4 分钟阅读

什么是异常？

异常是在程序执行期间发生的意外错误，可以是系统异常或应用程序异常。异常只是一些在执行期间出现的不正常事件或条件，可能会中断程序的正常流程。

异常可能由于不同的原因而发生，包括以下几点

用户输入了错误的数据或执行了除法运算符，例如尝试除以零。
连接在通信过程中断开，或系统内存耗尽。

异常处理

当程序执行期间发生错误时，异常提供了一种使用异常处理将控制权从程序的一部分转移到另一部分的方法来处理错误。 VB.NET 异常有四个内置关键字，例如Try、Catch、Finally和Throw，用于处理并将控件从程序的一部分移动到另一部分。

关键字	描述
Try	try 块用于监视应用程序中可能引发异常的特定异常。为了处理这些异常，它总是遵循一个或多个 catch 块。
捕获	它是在程序中出现问题的地方捕获带有异常处理程序的代码块。
Finally	它用于在程序中执行一组语句，无论是否发生异常。
Throw	顾名思义，throw 处理程序用于在发生问题后抛出异常。

VB.NET 中的异常类

在 VB.net 中，有各种类型的异常用类表示。这些异常类源于其父类“System.Exception”。

以下是主要在 VB.NET 中使用的两个异常类。

System.SystemException
System.ApplicationException

System.SystemException： 这是一个基类，包含所有预定义的异常类，以及在运行时生成的一些系统生成的异常类，例如DivideByZeroException、IndexOutOfRangeException、StackOverflowExpression等等。

System.ApplicationException：这是一个异常类，用于抛出由程序员或开发人员在应用程序中定义的异常。此外，我们可以说它是一个用户定义的异常，它继承自System.ApplicationException 类。

异常处理程序块的语法

Try
	' code or statement to be executed
	[ Exit Try block]
' catch statement followed by Try block
Catch [ Exception name] As [ Exception Type] 
[Catch1 Statements] Catch [Exception name] As [Exception Type]
[ Exit Try ]
 [ Finally
	[ Finally Statements ] ]
End Try

在上述语法中，Try/Catch 块总是被可能抛出异常的代码包围。而这段代码被称为受保护代码。此外，我们还可以使用多个 catch 语句来捕获程序中各种类型的异常，如语法所示。

异常处理示例

让我们创建一个程序，使用 Try、Catch 和 Finally 关键字来处理在 VB.NET 编程中将数字除以零的异常。

TryException.vb

Module TryException
    Sub divExcept(ByVal a As Integer, ByVal b As Integer)
        Dim res As Integer
        Try
            res = a \ b
            ' Catch block followed by Try block
        Catch ex As DivideByZeroException
            Console.WriteLine(" These exceptions were found in the program {0}", ex)
            ' Finally block will be executed whether there is an exception or not.
        Finally
            Console.WriteLine(" Division result is {0}", res)
        End Try
    End Sub
    Sub Main()
        divExcept(5, 0) ' pass the parameters value
        Console.WriteLine(" Press any key to exit...")
        Console.ReadKey()
    End Sub
End Module

输出

创建用户定义的异常

它允许我们创建派生自ApplicationException类的自定义异常。

让我们创建一个程序来了解 VB.NET 异常处理中用户定义异常的用法。

User_Exception.vb

Module User_Exception
    Public Class StudentIsZeroException : Inherits Exception

        Public Sub New(ByVal stdetails As String)
            MyBase.New(stdetails)
        End Sub
    End Class
    Public Class StudentManagement
        Dim stud As Integer = 0
        Sub ShowDetail()
            If (stud = 0) Then
                Throw (New StudentIsZeroException(" Student roll no 'zero' does not exist"))
            Else
                Console.WriteLine("  Student is {0}", stud)
            End If
        End Sub
    End Class
    Sub Main()
        Dim stdmg As StudentManagement = New StudentManagement()
        Try
            stdmg.ShowDetail()
        Catch ex As StudentIsZeroException
            Console.WriteLine(" StudentIsZeroException {0}", ex.message)
        End Try
        Console.ReadKey()
    End Sub
End Module

输出

使用 Try-Catch 语句

让我们使用 VB.NET 中的 Try-Catch 语句创建一个程序来处理异常。

Try_catch.vb

Imports System
Module Try_catch
    Sub Main(ByVal args As String())
        Dim strName As String = Nothing
        Try
            If strName.Length > 0 Then ' it thows and exception
                Console.WriteLine(" Name of String is {0}", strName)
            End If
        Catch ex As Exception  ' it cacthes an exception
            Console.WriteLine(" Catch exception in a proram {0}", ex.Message)
        End Try
        Console.WriteLine(" Press any key to exit...")
        Console.ReadKey()
    End Sub
End Module

输出

抛出对象

在 VB.NET 异常处理中，我们可以直接或间接抛出派生自System.Exception 类的对象异常。要在 catch 块中使用 throw 语句抛出对象，例如

让我们创建一个程序来在 VB.NET 异常中抛出一个对象。

throwexcept.vb

Imports System
Module thowexcept
    Sub Main()
        Try
            Throw New ApplicationException("It will throw a custom object exception")
        Catch ex As Exception
            Console.WriteLine(" Custom Exception is: {0}", ex.Message)
        Finally
            Console.WriteLine("Finally block statement executes whether there is an exception or not.")
        End Try
        Console.WriteLine(" Press any key to exit")
        Console.ReadKey()
    End Sub
End Module

输出

下一个主题VB.NET 文件处理

VB.NET 异常处理

什么是异常？

异常处理

VB.NET 中的异常类

异常处理示例

创建用户定义的异常

使用 Try-Catch 语句

抛出对象

联系信息

关注我们

教程

面试题

在线编译器

Python

Java

.Net Framework

AI, ML and Data Science

Cloud Technology

B.Tech and MCA

Web Technology

PHP

Software Testing

Technical Interview

Java Interview

Python

Web Interview

Database Interview

B.Tech / MCA

Important Interview

Software Testing Interview

Company Interviews

Online Compilers

Multiple Choice Questions

VB.NET 教程

VB.NET 异常处理

什么是异常？

异常处理

VB.NET 中的异常类

异常处理示例

创建用户定义的异常

使用 Try-Catch 语句

抛出对象

相关帖子

VB.NET vs Visual Basic

动态控件

VB.NET HashTable

CheckBox 控件

Menu 控件

.NET Framework

VB.NET List

ScrollBars 控件

VB.NET Sub

你好世界程序

订阅 Tpoint Tech

联系信息

关注我们

教程

面试题

在线编译器