作者terance (修)
站內Visual_Basic
標題Re: [VB6 ]將下拉式選單內容,自動對應於某txt檔
時間Wed Nov 30 20:25:33 2005
: Private Sub Form1_Load()
: Timer1_Timer
: End Sub
這個地方要放TIMER物件進去吧
我第一次沒想到要放說
: Private Sub UpdateCombo() '載入選單資料
: ...
: End Sub
這個程序不是內建,該怎麼新增出來?
: Private Sub Timer1_Timer() '事件
: Static FDT As Long '記錄前一次修改時間
: If FileDateTime(pathname) > FDT Or FDT = 0 Then
: '若是零代表選單資料還沒有被載入過
: UpdateCombo
: End If
IF FileDateTime("c:\text.txt") > FDT Or FDT = 0 Then
UpdateCombo
這樣寫對嗎?
: End Sub
對不起,我是新手,盡量會把問題簡化到,大家回是或否就好了
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.217.72.60