vb利用三個text框架來支援系統時間問題?

Question

由於這個課程是vb與rs232的連接通訊課程,老師為了要建立一些基礎概念,但是老師說vb不是他該交的部分,所以有些程式東西幾乎都是靠課本收尋資訊!

這次上課是一個碼表計數,有1/10s,1s,1minute這三個架構
這三個架構我分別用text框架隔了開來,分別是text1~3

碼表是做完了,但是老師追加的題目有點小複雜

老師說在秒的框架中要顯示系統中的秒數,當然分也是...
所以在text2,text3中分別要抓取系統時間資料
也要做回圈的動作讓程式一直抓取資料,不然他只抓一次就不會再抓第二次時間了(不曉得我有沒有說錯)

ex:

[ 分 ]:[ 秒 ]:[1/10秒]
由於系統時間最小單位應該就是秒,所以1/10秒的部分可以不用顯示出來,只要求秒跟分鐘就好
我的結構大概是這樣....
不知道大家看的董我的問題嗎???
尋求能夠幫我解決問題的版有,謝謝!!

Answer 1

'應該是用Timer下去做比較不浪費資源,表單置1個Timer,2個TextBoxPrivate Sub Form_Load()    Timer1.Interval = 500 '每0.5秒更新1次    Timer1 = TrueEnd SubPrivate Sub Timer1_Timer()    Text1 = Minute(Now) '分    Text2 = Second(Now) '秒End Sub'若要用迴圈做可改成,表單置2個TextBoxDim B As BooleanPrivate Sub Form_Load()    Show    Do      Text1 = Minute(Now) '分      Text2 = Second(Now) '秒      DoEvents    Loop Until BEnd SubPrivate Sub Form_Unload(Cancel As Integer)    B = True    EndEnd Sub