恭喜,你发布的帖子
发布于 2022-04-10 13:52:47
1楼
可以使用Msgbox函数弹出,通过Msgbox函数返回值二次确认。
'远程单动按钮脚本
If 变量.Read = 1 then
If msgbox("远程单动",VbOKCancel) = vbok then
变量.Write 0
Else
Exitsub
End If
End If
'远程联动按钮脚本
If 变量.Read = 0 then
If msgbox("远程联动",VbOKCancel) = vbok then
变量.Write 1
Else
Exitsub
End If
End If
请填写推广理由:
分享
只看
楼主