用西门子wincc7.5的vbs脚本编写一段程序 要求: 1:按下启动按钮,把变量二给到变量一。 2:然后延时time1分钟后,把变量三给到变量一。 3:然后再延时time2分钟后,把0kw给到变量一。 4:按下停止按钮,时间都清0,变量一里的值也为0。 5:如果下次再按启动按钮,能把上面的循环一遍。 6:变量一、变量二、time1、time2在画面能设定。

时间: 2024-04-05 08:33:15 浏览: 13
以下是实现你要求的 VBScript 代码: ``` ' 定义变量 Dim var1, var2, var3, time1, time2 Dim startTime, stopTime, elapsed ' 初始化变量 var1 = 0 var2 = 0 var3 = 0 time1 = 1 time2 = 2 ' 定义事件处理程序 Sub StartButton_Click() ' 将变量二赋值给变量一 var1 = var2 ' 启动计时器 startTime = Now() ' 延时 time1 分钟 Do While True elapsed = DateDiff("n", startTime, Now()) If elapsed >= time1 Then Exit Do End If Sleep(1000) Loop ' 将变量三赋值给变量一 var1 = var3 ' 启动计时器 startTime = Now() ' 延时 time2 分钟 Do While True elapsed = DateDiff("n", startTime, Now()) If elapsed >= time2 Then Exit Do End If Sleep(1000) Loop ' 将 0kw 赋值给变量一 var1 = 0 End Sub Sub StopButton_Click() ' 清零变量和时间 var1 = 0 startTime = 0 stopTime = 0 End Sub ' 辅助函数:暂停执行一定时间 Sub Sleep(milliseconds) Dim waitTime waitTime = Now() + (milliseconds / 1000 / 86400) Do While Now() < waitTime DoEvents Loop End Sub ``` 以上代码假设你已经在 WinCC 中创建了两个按钮(StartButton 和 StopButton)和四个变量(var1、var2、var3、time1、time2),并将 StartButton 的 Click 事件和 StopButton 的 Click 事件分别绑定到 StartButton_Click 和 StopButton_Click 事件处理程序。在画面中,你可以通过修改变量 var2、var3、time1 和 time2 的值来控制程序的行为。

相关推荐

最新推荐

recommend-type

wincc用vbs脚本写入sqlserver数据库.docx

wincc用VBS代码向数据库内写入数据图文教程,附带vbs代码样例环境win764+winccv7.2+sqlserver2008
recommend-type

WinCC建立全局脚本及变量连接.doc

wincc在进行变量运算时,除读上来的PLC变量之外,对于一些需要进行运算的变量,因为没有PLC变量的触发条件,运行程序也就谈不上运行,因此建立全局脚本进行这部分的运算,可以保证数据处理实时进行。
recommend-type

wincc 趋势曲线VBS脚本

博途V15 wincc使用VBS脚本添加删除趋势曲线,文件为添加删除曲线脚本
recommend-type

wincc使用VBS操作趋势曲线.docx

wincc使用VBS脚本操作趋势曲线,此文件对1月份的所发布趋势曲线增加删除的补充,添加一个个人例子
recommend-type

Wincc7.2Web发布操作介绍.docx

Wincc 项目Web发布相关设置以及操作介绍 首先需要对服务器系统进行相关配置,如下图
recommend-type

zigbee-cluster-library-specification

最新的zigbee-cluster-library-specification说明文档。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

【实战演练】MATLAB用遗传算法改进粒子群GA-PSO算法

![MATLAB智能算法合集](https://static.fuxi.netease.com/fuxi-official/web/20221101/83f465753fd49c41536a5640367d4340.jpg) # 2.1 遗传算法的原理和实现 遗传算法(GA)是一种受生物进化过程启发的优化算法。它通过模拟自然选择和遗传机制来搜索最优解。 **2.1.1 遗传算法的编码和解码** 编码是将问题空间中的解表示为二进制字符串或其他数据结构的过程。解码是将编码的解转换为问题空间中的实际解的过程。常见的编码方法包括二进制编码、实数编码和树形编码。 **2.1.2 遗传算法的交叉和
recommend-type

openstack的20种接口有哪些

以下是OpenStack的20种API接口: 1. Identity (Keystone) API 2. Compute (Nova) API 3. Networking (Neutron) API 4. Block Storage (Cinder) API 5. Object Storage (Swift) API 6. Image (Glance) API 7. Telemetry (Ceilometer) API 8. Orchestration (Heat) API 9. Database (Trove) API 10. Bare Metal (Ironic) API 11. DNS
recommend-type

JSBSim Reference Manual

JSBSim参考手册,其中包含JSBSim简介,JSBSim配置文件xml的编写语法,编程手册以及一些应用实例等。其中有部分内容还没有写完,估计有生之年很难看到完整版了,但是内容还是很有参考价值的。