找答案的高端用户（找答案钻石及双钻级别的用户）将尽可能从此问题下的所有回
答中，为您推荐最佳答案。届时您可以根据推荐数采纳答案。
如果自提问时间起7天内您仍无法选出最佳答案，您可以选择“无满意答案”关闭此问题。
问题
取消精华
首页精华问答
取消推荐
高端用户推荐
申请置评
已申请置评
修改
修改标签
添加标签
官方认证
取消官方认证
修改标签
添加标签
转移分类
删除
{{itemCategory}}
程序如下：
Dim Tag
Set Tag = HMIRuntime.Tags("注销监控")
Tag.Read
Tag.Write 1-Tag.Value
If Tag.Value Then
Dim camera1A,camera1B,camera1C,camera1D
Set camera1A = ScreenItems("控件2")
camera1B = camera1A.Client_Logon("172.10.10.1",37777,"admin","admin123")'
camera1C = camera1A.RealPlayEx(0,0)
Else
camera1A.Client_Logout(camera1B)
End If
扫码小程序：
一键登录查看全部问答
讲解视频
一分钟，西门子工程师带你解析本题
等您来回答
换一换
{{item.CoinValue}}西币
{{item.VisitNum}}人想问
本版相关问题
换一换
专家置评
找答案微信小程序
提问
搜索
西门子商城
西门子中国
10
无满意答案关闭
待解决
问题补充
本版热门问题
{{item.ReadCount}}人关注
向您推荐
{{item.VisitNum}}人关注
