需要准备的工具:电脑,VB6.0程序设计软件。
1、打开VB6.0,新建一个工程,在窗体中添加三个命令按钮,caption分别改为“设置倒计时”、“启动倒计时”、“继续”,将窗体Form1的caption属性改为“倒计时”,添加一个计时器控件,添加一个文本框,将界面设置成下图:
2、将文本框的Text属性清空,将字体Font属性调整为小四,便于观察,将背景色属性Backcolor调为浅、黄色。
3、双击“设置倒计时”命令按钮,进入代码编辑窗口,输入如下代码:
a=InputBox("请输入倒计时时间(以分为单位):","倒计时输入框"
4、双击“启动倒计时”命令按钮,进入代码编辑窗口,输入如下代码:
Timer1.Interval=1000'设置计时器为一秒发生一次
Timer1.Enabled=True'激活计时器
If a <60 Then
m=a
Else
h=s\60
m=aMod60
EndIf
m=m-1
s=60
5、双击“计时器”控件,进入代码编辑窗口,输入如下代码:
s=s-1
If s = 0 And m <>0 Then
s=60
m=m-1
EndIf
If m = 0 And h <>0 Then
h=h-1
m=59
s=60
6、VB6.0制作倒计时计时器在代码编辑窗口的通用段进行变量定义:
Dim h As Integer,m As Integer,s As Integer'分别存储时分秒
Dim a AsInteger
7、双击窗体,进入代码编辑器,在Form_Load事件中写入代码:
Timer1.Enabled=False'先关闭计时器
8、关闭代码窗口,按下F5运行程序,单击“设置倒计时”命令按钮,d出输入对话框,此时输入分钟数为1,确定,如图:
9、单击“启动倒计时”命令按钮,文本框显示倒计时时间,并时刻变动,至此实现了倒计时功能,如图:
你想问的是三菱plc编程的计时指令程序吧,以下是一个简单的计时指令的plc程序。1、以X0输入端作为计时开始信号,当PLC内部接收到计时信号时,位软元件X1接通。在左母线处直接输入“ld x0”,就可以在梯形图中输入。
2、以T0作为PLC内部计时器,注意计时器的类型:T0~T199表示100ms通用定时器,T200~T2451表示0ms通用定时器,可以在输入信号后端输入“out t0 k30”,k30表示3000ms,即3秒。
3、当计时结束后要有输出信号,这个输出信号可以控制外部设备,也可以作为警示灯,这里以Y0做为输出。
4、当计时结束后,如果不断开计时器也不复位,这时计时器将保持最后数值,可以增加复位指令对C0复位。在完成之后,可点击测试按钮进行仿真。
5、在逻辑测试对话框可以增加位元件监控画面,点击菜单的“软元件”,然后选择“软元件窗口”,选择X和Y,即可对所编程序的输入和输出进行 *** 作和监控。
6、在X输入对话框中,如果点击一次输入按钮可以将输入自锁,点击两次自锁解除。当点击X0后等待3秒,这时Y0将输出。如果点击两次X1,则可以对计时器复位,复位后重新计时。
三菱plc计时程序编程实例,该plc计时程序利用plc中的“c”计数器完成计时。
用T指令, 格式是 (Tn KX)举例:\x0d\x0ald x0 \x0d\x0aOUT T0 K100\x0d\x0a意思就是当x0接通后 计时10秒,T0接通。 后续用T0去处罚需要的输出点就可以达到控制延时计时的目的。欢迎分享,转载请注明来源:内存溢出
评论列表(0条)