现在在编程,遇到一个功能,不知道用VB怎么编出来,希望高手们赐教!谢谢!
dim tag1,tag2tag3,tag4...
if (条件成立时)then
tag1=指定的变量的值(例A1)
当过半小时后,tag2=A1的值
再过半小时,tag3=A1的值
...
就这样循环,这个过半小时怎么用VB表达出来呢,还是可以用全局脚本中的定时器啊?如果是用定时器,那么请给个阅读文件学习一下。。。
最佳答案
那你肯定要用全局脚本来做了,因为你要时时监测时间差的,可以这样做;
dim tag1,tag2,tag3,tag4
dim temptime
dim num
dim
if (条件成立)
temptime=now ''记录下当前的时间
num=DateDiff("n", temptime, now) ''''取当前时间于条件满足时刻的时间差
select case num
case 0 ''条件刚满足时时间差为0
tag1=A1
case 30
tag2=A1 ''条件满足半小时以后
case 60
tag3=A1
case 90
tag4=A1
case else
end select
end if
这样给全局脚本添加一个定时器,比如十分钟一次,这样当条件满足时,每隔半小时tag1-tag4的变量会依次赋值了。
提问者对于答案的评价:
谢谢
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc263989.html