好的，下面是使用定时器控件实现延时的示例代码：
首先，在WinCC的画面设计器中添加一个定时器控件Timer1，并设置定时器的Interval属性为1秒。
在按钮1的OnClick事件中，启动定时器，并保存当前时间戳，表示开始延时。
在定时器的OnTimer事件中，判断当前时间与开始时间的差值是否达到了需要延时的时长。如果达到了，停止定时器，执行相应操作（这里是复位按钮1）。
如果未达到，继续等待下一次OnTimer事件的触发。
代码示例如下：```VBScript\\\'延时20秒Dim StartTimeSub Button1_Click() Timer1.Enabled = True \\\'启动定时器 StartTime = Now() \\\'保存当前时间戳End SubPrivate Sub Timer1_OnTimer() Dim DelayTime DelayTime = DateDiff(\"s\", StartTime, Now()) \\\'计算已经延时的时长（秒） If DelayTime >= 20 Then \\\'已经延时20秒 Timer1.Enabled = False \\\'停止定时器 Button1.Value = False \\\'复位按钮1 End IfEnd Sub```上述示例代码只实现了20秒的延时功能，如果需要延时20分钟、20小时、20天等不同的时间长度，只需要在定时器的OnTimer事件中修改DelayTime的计算方法即可。例如，将计算方法改为：```VBScriptDelayTime = DateDiff(\"n\", StartTime, Now()) * 60 \\\'计算已经延时的时长（分钟）```即可实现20分钟的延时。 |
