有时候我们希望做某个操作时，有密码管理或者二次确认。密码管理可以通过用户管理方式设置权限，也可以通过弹窗输入密码的方式；二次确认主要是使用弹窗然后捕获用户点击的按钮编号来进行。下面通过一个简单的日子记录一下如何实现。
一 准备工作，在wincc页面中放入两个圆形，名字为cicle1，cicle2，圆圈取消全局颜色方案。
二 脚本
1. 密码管理功能
在按钮中输入以下VBS脚本，运行时输入密码，如果密码正确，则改变圆圈的填充颜色。此脚本主要是运用inputbox函数。
Sub OnClick(ByVal Item)
Dim cicle,password
Set cicle=ScreenItems("cicle1")
password=Inputbox("输入弹窗显示的内容","输入弹窗标题栏的内容","1234567",300,300)
If password="7654321" Then
cicle.BackColor =RGb(0,255,0)
cicle.FillingIndex=100
Else
Msgbox "密码错误，请重新输入"
End If
End Sub
2. 二次确认功能
在按钮中输入以下VBS脚本，运行时点击按钮出现选择对话框，选择确定则改变圆圈颜色，选择取消，则不改变圆圈颜色。
Sub OnClick(ByVal Item)
Dim cicle,btn
Set cicle=ScreenItems("cicle2")
btn=Msgbox("你确定要这样?",1,"这里是标题") '显示“确定”和“取消”按钮，默认第一个按钮
If btn=1 Then '选择了“确定”按钮
cicle.BackColor =RGb(0,255,0)
cicle.FillingIndex=100
End If
If btn=2 Then
Msgbox "好吧，你最终还是放弃了"
End If
End Sub
