LastDLLError 属性

返回一个通过调用动态链接库 (DLL) 生成的系统错误代码。 只读。 在 Macintosh 上,LastDLLError 始终返回 0。

备注

LastDLLError 属性仅适用于从 Visual Basic 代码进行的 DLL 调用。 当生成此类调用时,调用的函数通常会返回一个指示成功或失败的代码,并且将填充 LastDLLError 属性。

检查 DLL 的函数的文档以确定指示成功或失败的返回值。 只要返回失败代码,Visual Basic 应用程序就应立即检查 LastDLLError 属性。 在设置 LastDLLError 属性时,未引发任何异常。

示例

粘贴到 UserForm 模块时,以下代码会导致尝试调用 DLL 函数。 调用失败的原因是,传入的参数(一个空指针)生成一个错误,并且在任何事件中,如果 SQL 未运行则无法取消它。

调用后的代码检查调用的返回,然后在 Err 对象的 LastDLLError 属性处打印,以显示错误代码。 在没有 DLL 的系统上, LastDLLError 始终返回零。

Private Declare Function SQLCancel Lib "ODBC32.dll" _
 (ByVal hstmt As Long) As Integer

Private Sub UserForm_Click()
    Dim RetVal
    ' Call with invalid argument.
    RetVal = SQLCancel(myhandle&)
    ' Check for SQL error code.    
    If RetVal = -2 Then
        'Display the information code.
        MsgBox "Error code is :" & Err. LastDllError 
    End If
End Sub

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。