[問題] VB.NET如何每秒印出電腦時間

[dinosaur15 (spaceman)]

這是我的作業，我想了好久不知道該怎麼做，請各位幫我想想必要的語法好嗎？感激＞"＜
亂數的問題是還好，我大概懂，最麻煩的就是不知道怎麼一秒印出一次電腦時間＞"＜
如何每秒產生一個亂數！並印出當時電腦時間！大概的印出結果：

開始時間：2005/3/28 下午03：40：45
號碼　　電腦時間
09      2005/3/28 下午03：40：46
29      2005/3/28 下午03：40：47
35      2005/3/28 下午03：40：48
15      2005/3/28 下午03：40：49
05      2005/3/28 下午03：40：50
41      2005/3/28 下午03：40：51
結束時間：2005/3/28 下午03：40：52

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.139.203.161
→ clifflu:使用 timer 物件 或是引用 timer
→ dinosaur15:->
→ dinosaur15:那要如何設定讓他依秒出現一次？謝謝
> -------------------------------------------------------------------------- <

作者: JJss (不告訴你) 看板: Visual_Basic
標題: Re: [問題] VB.NET如何每秒印出電腦時間
時間: Thu Mar 31 13:42:05 2005

※ 引述《dinosaur15 (spaceman)》之銘言：
: 這是我的作業，我想了好久不知道該怎麼做，請各位幫我想想必要的語法好嗎？感激＞"＜
: 亂數的問題是還好，我大概懂，最麻煩的就是不知道怎麼一秒印出一次電腦時間＞"＜
: 如何每秒產生一個亂數！並印出當時電腦時間！大概的印出結果：
: 開始時間：2005/3/28 下午03：40：45
: 號碼　　電腦時間
: 09      2005/3/28 下午03：40：46
: 29      2005/3/28 下午03：40：47
: 35      2005/3/28 下午03：40：48
: 15      2005/3/28 下午03：40：49
: 05      2005/3/28 下午03：40：50
: 41      2005/3/28 下午03：40：51
: 結束時間：2005/3/28 下午03：40：52

  設定Timer的時間為每秒一次 (1000)

  Timer()執行

  Text1.Text = Text1.Text & int(rnd()*100)+1 & _
               Now(Day) & ":" & Hour(Now) & ":" & Minute(Now) & ":" & _
               Second(Now) & VbCrLf

  應該會是你要的

  指令有些太久沒用可能錯誤，還請其它大大多多指教





--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.69.52.215
※ 編輯: JJss            來自: 210.69.52.215        (03/31 13:42)
推 Phill:時間可用 Datetime.now 來顯示
推 JJss:P兄也會VB @@ ，本是同道中人 相踩何太急 XD
推 Phill:就說了 "俺"也是千百個"博"願意呀 XD
推 JJss:明明就是壞蛋 XD