if msgbox("确实要执行吗？",4,"警告")=6 then
hmiruntime.tags("tag").write 1
end if
-----上面弹出两个按钮，是和否，点是，tag为1，点否，tag值不变。