下面是满足要求的西门子winCC 7.4 c脚本程序：
[code]Function OnClick
Dim runVar
runVar = GetVar("RUN")
If runVar = 1 Then
SetVar "RUN", 0
ElseIf runVar = 0 Then
SetVar "RUN", 1
End If
End Function[/code]
解释如下：
1. `Function OnClick` 表示该代码段将在按钮单击事件中被触发执行。
2. `Dim runVar` 定义一个名为 runVar 的变量来存放“RUN”内部变量的值。
3. `runVar = GetVar("RUN")` 将内部变量“RUN”的值赋值给 runVar 变量。
4. `If runVar = 1 Then` 如果 runVar 等于 1。
5. `SetVar "RUN", 0` 则设置内部变量“RUN”的值为 0。
6. `ElseIf runVar = 0 Then` 否则如果 runVar 等于 0。
7. `SetVar "RUN", 1` 则设置内部变量“RUN”的值为 1。
当用户单击按钮时，该函数会检查“RUN”内部变量的当前值。如果它为1，则将其设为0；如果它为0，则将其设为1。 |
