BarRecord.Status
Get the status of this bar record
Syntax
status =
barreocrd.Status
Parameters
None
Returns
StatusType. The current value of the Status property
Example
This example displays the Status property
Dim status as
StatusType
status = barrecord.Status
Dim msg as String
Select Case status
Case stOK
msg = "Status is OK"
Case stWarning
msg = "Status is Warning"
Case stError
msg = "Status is Error"
End Select
MsgBox msg
|