求1个按时计费程序！ - VFP论坛

firefox2002

等　级：新手上路
帖　子：10
专家分：0
注　册：2008-10-5

楼主

问题点数：0 回复次数：6

求1个按时计费程序！

也就是每36秒计费1毛，在表单中单击开始按钮，开始计时和计费，按结束按钮，显示时间和费用！

搜索更多相关主题的帖子: 计费　

2008-10-08 22:24

firefox2002

等　级：新手上路
帖　子：10
专家分：0
注　册：2008-10-5

第 3 楼

得分:0

不足36秒，就不计费了！

谢谢了！

2008-10-08 23:02

Tiger5392

等　级：贵宾
威　望：88
帖　子：2775
专家分：2237
注　册：2006-5-17

第 5 楼

得分:0

在表单中添加一个时间控件(Timer1)，一个命令按钮(Command1)，两2个标签(Label1和Label2)。布局自己调整。
(1)Form1.Init:
Public tTime
(2)Command1.Click:
tTime=Datetime()
ThisForm.Timer1.InterVal=36000
(3)Timer1.Timer:
nSec=Datetime()-tTime
ThisForm.Label1.Caption=Alltrim(Str(nSec))+'秒'
ThisForm.Label2.Caption=Alltrim(Str((Int(nSec/36)+1)/10,10,2))+'元'

感言：学以致用。博客：http://www./blog/user14/65009/index.shtml email：Tiger5392@

2008-10-08 23:13

崔厚强

等　级：新手上路
帖　子：1
专家分：0
注　册：2010-7-2

第 7 楼

得分:0

我需要一个分时段计费程序能指教下怎么做吗

2010-07-02 22:14