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

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

[解决办法]
TimeValue( "14:20:00 ")-30/(24*60) '--30表示30分钟
[解决办法]
这个好办啊，你用left函数取左边第二个字符，如果是“：”则给该字符串前+0，如果不是，则原字符串不变

或者用个format函数一规范就可以了（推荐）
[解决办法]
Dim str As String
str = "2:50 "
Text1.Text = Format(str, "hh:mm ")

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

如果带秒就是 "hh:mm:ss "
[解决办法]
text2.text=dateAdd( "n ", -30, text1.text)