ThrowError Property | ||
Syntax
Remarks
Data Type
Example
TimeClient1.ThrowError = False strValue = TimeClient1.GetTime(strHostName) If Len(strValue) = 0 Then MsgBox TimeClient1.LastErrorString, vbExclamation Exit Sub Endif
On Error Resume Next: Err.Clear TimeClient1.ThrowError = True strValue = TimeClient1.GetTime(strHostName) If Err.Number <> 0 MsgBox Err.Description, vbExclamation Exit Sub Endif On Error GoTo 0 See Also |
||
Copyright © 2023 Catalyst Development Corporation. All rights reserved. |