测试没问题啊。
你将时间Fromat一下，然后写入控件的Text属性。
点击文本框没有你说的跳回00：00的现象
测试代码：
窗口AfterLoad事件
Dim tbx As WinForm.TextBox = e.Form.Controls("TextBox1")tbx.Text = Format(Date.Now,"g")
加好友 
发短信
Post By：2013/4/10 12:09:00 [显示全部帖子]
