作者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