|
IsDebugVersion Function
|
|
|
Prototype
|
Public Declare Function IsDebugVersion Lib "TclBridge.dll" () As Long
|
|
Input
|
None.
|
|
Output
|
None.
|
|
Returns
|
Non-zero if the library is the debug version, zero otherwise.
|
|
COM Results
|
Not applicable.
|
|
Side Effects
|
None.
|
|
Description
|
None.
|
|
Notes
|
The declaration for this function is in the "TclBridgeSupport" (TCLBSUPT.BAS) module.
|
|
Example
|
Private Sub Command1_Click()
If IsDebugVersion() Then MsgBox "The library is the debug version.", vbInformation, App.Title Else MsgBox "The library is not the debug version.", vbInformation, App.Title End If End Sub |