在VB和VB.NET程序中判断当前是否运行于开发环境中

页面导航:首页 > 软件编程 > vb.net > 在VB和VB.NET程序中判断当前是否运行于开发环境中

在VB和VB.NET程序中判断当前是否运行于开发环境中

来源: 作者: 时间:2016-01-21 10:23 【

有时我们需要判断正在运行的程序是处于开发环境下(调试模式),还是正常运行状态(已编译后).以前看到个VB6的判断方式:Public Function IsDebugMode() As Boolean IsDebugMode = False On Error

有时我们需要判断正在运行的程序是处于开发环境下(调试模式),还是正常运行状态(已编译后).以前看到个VB6的判断方式:

Public Function IsDebugMode() As Boolean

    IsDebugMode = False

    On Error Resume Next

    Debug.Print 1 / 0

    If Err.Number <> 0 Then

        IsDebugMode = True

    End If

End Function


这段代码的原理就在于:在编译之后的应用程序运行时会直接忽略Debug.Print这一语句.也就是说,若不产生错误,说明这个语句根本没有执行,因而是在编译后的实际环境中;而如果产生了错误,则说明这个语句正常地执行了,说明是在开发环境中.


如今这个方法用在VB2005中不行了.因为在.NET 2005中,1/0并不会产生错误,而是得到一个输出结果:无穷大.这样的话,在VB2005中必须让Debug去Print一个会产生异常的表达式.可以改进如下:

 

Public Function IsDebugMode() As Boolean

    Dim o As Object = Nothing

    Try

        Debug.Print(o.Name)

        Return False

    Catch ex As Exception

        Return True

    End Try

End Function

在这段代码中,定义了一个对象变量,并赋值为空,因此,o.Name会产生一个System.NullReferenceException的异常

Tags:

相关文章

    文章评论

    最 近 更 新
    热 点 排 行
    Js与CSS工具
    代码转换工具
    
    <