搬家第四天-90.Wincc 项目模块编程示例1-VBS制作随机数

有时候，我们在wincc中有大量的需要重复书写的相同或者类似的脚本，这个时候我们可以把这些代码写成项目模块程序（function）或者过程（sub），在需要的地方调用就是了。

    我们有时需要给人演示wincc界面效果，这个时候可能并没有连接PLC实际硬件，要模拟数值变化可以选择输入输出域、滑块（slider）或者wincc自带的工具Tag simulater，但是这些方法都需要手工操作，不是太方便，我们可以通过随机函数的方法，让数值在某个区间随机变化，看起来像有硬件连接一样。

      我们打开wincc项目管理器的vbs脚本编辑器，新建一个项目模块Myrnd.bmo,用VBS写一个Myrnd函数

Function MyRnd(min,max)
MyRnd=Rnd*(max-min+1)+min '在（min,max)之间取随机数
End Function

再新建一个vbs动作，每1秒触发一次

Option Explicit
Function action
Dim FT101
Set FT101=HMIRUNtime.Tags("S7$程序(1)/FT101")
FT101.Write MyRnd(100,200)
End Function

画面上放置输入输出域，关联变量S7$程序(1)/FT101。项目计算机属性-启动项目勾选“全局脚本”，运行后就可以看到画面上随机显示的数值了。如果有很多变量都需要随机数值，那么在全局动作中，继续添加其他变量，使用Myrnd项目函数就是了。