utils.bas

COM编程接口处理方法 多个方法调用COM库函数

Attribute VB_Name = "Utils"
Option Explicit

Public Const E_NOTIMPL = &H80004001 ' Constant that represents the standard HRESULT
Public Const E_FAIL As Long = &H80004005 ' HRESULT constant for returning errors
Public Const S_FALSE = &H1        ' Constant that represents the standard HRESULT

Public Const g_sFileExtension = ".spt"