mftpsupport.bas

来自「用vb开发的ftp客服端」· BAS 代码 · 共 10 行

Attribute VB_Name = "MFtpSupport"
Public p_intCounter As Integer
 
Sub TimerProc(ByVal hwnd As Long, ByVal uMsg As Long, ByVal idEvent As Long, ByVal dwTime As Long)

    p_intCounter = p_intCounter + 1

End Sub