（vb学习中...)时间格式如何进行加减？

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

（vb学习中...)时间格式如何进行加减？[已结贴,结贴人:cqjc1]

发表于：2007-03-21 13:43:49 楼主

（vb学习中...)
例如text1.text= "14:20:00 "
我要把14:20:00减去半小时，在text2.text中得到 "13:50:00 "
查了半天的vb的书，没看见有时间加减这方面的函数啊。
新手上路，多多关照.

发表于：2007-03-21 14:07:271楼得分:10

timevalue（ "14:20:00 ")-30/（24*60) '--30表示30分钟

发表于：2007-03-21 15:22:562楼得分:0

运行后当text1.text= "03:20 "
text2.text= "2:50 "
能否让文本框得到 "02:50 "这个格式？

发表于：2007-03-21 15:40:383楼得分:10

这个好办啊，你用left函数取左边第二个字符，如果是“：”则给该字符串前+0，如果不是，则原字符串不变

或者用个format函数一规范就可以了（推荐）

发表于：2007-03-21 16:01:004楼得分:10

dim str as string
str = "2:50 "
text1.text = format（str, "hh:mm ")

这样text1.text就会显示02：50

如果带秒就是 "hh:mm:ss "

发表于：2007-03-21 16:45:495楼得分:0

dateadd（ "n ",-30, "14:20:00 ")

发表于：2007-03-21 16:50:196楼得分:10

text2.text=dateadd（ "n ", -30, text1.text)

发表于：2007-03-21 16:53:577楼得分:0

text1.text = "03:20 "
text2.text = dateadd（ "n ", -30, text1.text)
text2.text = format（text2.text, "hh:mm ")

发表于：2007-03-21 21:24:538楼得分:0

dateadd

其他资讯