用vbs实现电机启动停止功能
1，语言vbs
2，wincc7.5版本
3，wincc启动停止信号run，类型bool
4，按下启动按钮，则run=1，释放启动按钮则run=0
5，画面中有一个启动按钮，名称为start，用这个按钮来控制电机的启动停止
以下是使用vbs编写的实现电机启动停止功能的程序：
'定义wincc对象
Dim objWinCC
'获取wincc对象
Set objWinCC = GetObject(, "WinCCRuntime" & "." & objWinCC.ProjectName)
'定义启动按钮对象
Dim btnStart
'获取启动按钮对象
Set btnStart = objWinCC.GetRuntimeObject("start")
'定义标志位变量
Dim runFlag
'初始化标志位为0
runFlag = 0
'循环读取按钮状态并处理
Do While True
'读取启动按钮状态
If btnStart.IsPressed Then
'启动按钮按下，将标志位设置为1
runFlag = 1
Else
'启动按钮释放，将标志位设置为0
runFlag = 0
End If
'根据标志位控制电机状态
If runFlag = 1 Then
'电机启动
objWinCC.WriteBool "run", True
Else
'电机停止
objWinCC.WriteBool "run", False
End If
'延时100ms
WScript.Sleep 100
Loop
程序中创建了一个wincc对象，通过该对象获取启动按钮对象和项目名称。然后在无限循环中读取启动按钮的状态，根据按钮状态控制电机的启动和停止。程序每次循环会延时100ms，以避免程序占用过高的CPU资源。
页:
[1]