Re: [VB6 ] 請問如何抓取系統時間又將其記錄起來?
※ 引述《qtw (猴王~)》之銘言：
: 請原諒這是一個初學者中的初學者問的問題...Orz
: 以簡單的例子來講
: 設定兩個Command和一個List
: 當按下Command 1之後會把按下的時間紀錄下來
: 然後按下Command 2可以在List 1列出之前按下Command 1的時間
: 這個問題困擾了我好久...請大大幫我解答吧...<= =>
我依Bear大的程式稍作修改之後，已經得到我所想要的答案了
謝謝兩位大大的解答
在這邊把我寫出的程式給大家看看
如果還有能夠修正的地方請多指教^^"
Private Sub Command1_Click()
If FreeFile = 1 Then
Open "c:\3.txt" For Append As #1
End If
Write #1, Text1
Close #1
End Sub
Private Sub Command2_Click()
List1.Clear
Open "c:\3.txt" For Input As #2
Do While Not EOF(2)
Input #2, p1
List1.AddItem p1
Loop
Close #2
End Sub
Private Sub Form_Load()
Timer1.Interval = 1000
Text1 = ""
End Sub
Private Sub Timer1_Timer()
Text1.Text = Now
End Sub
--
拒看智缺與腦殘新聞!!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.127.133.200
推
09/18 20:10, , 1F
09/18 20:10, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 2 之 2 篇)：
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
20
79