示例:获取系统标签
本示例用于显示包含
System\Time
标签说明及标签值的消息框。Sub ShowSystemTime() Dim SystemTime As Tag 'Get a Tag object for the System\Time tag. Set SystemTime = TagDB.GetTag("System\Time") MsgBox SystemTime.Description & " is " & SystemTime.Value 'Release resources associated with the tag object. Set SystemTime = Nothing End Sub
提供反馈