Ftp 如何在VB6中调用Inet_StateChange？

我的vb6项目中有2个表单，它开始加载表单1，然后加载表单2

在表格1中，我有一个计时器。（我将此用于其他功能）。
在表2中，我有一个Inet和Inet1_状态更改。每次执行时，它都会转到我的Form 1计时器

第一个问题，如何执行Inet1_StateChanged？第二，为什么每次Inet1执行时都会形成1

这是我的Inet在表格2中的代码：

With Inet1
    .AccessType = icUseDefault
    .Protocol = icFTP
    .URL = "" & ftphost & ""
    .username = "" & ftpuser & ""
    .password = "" & ftppass & ""
    .Execute , "PUT  " & File_PATH & "" & fname & "  " & ftphostpath & "" & fname & ""
End With

---

提前感谢您的回复

Inet1\u状态已更改。。是一个事件，不要手动执行事件。它由inet1的“状态更改”触发。帮助文件中的状态更改事件列表。。。如果你希望你能分享更多关于你的代码的信息，这样我（我们）就可以看它了

事件 代码 描述 伊克农 0 没有国家报告。 鱼鳞石 1. 控件正在查找指定主机的IP地址。 鱼鳞溶解 2. 控件已成功找到指定主机的IP地址。 icConnecting 3. 控件正在连接到主机。 icConnected 4. 控件已成功连接到主机。 icRequesting 5. 控件正在向主机发送请求。 icRequestSent 6. 控件已成功发送请求。 icReceivingResponse 7. 控件正在接收来自主机的响应。 ICR响应 8. 控件成功接收到来自主机的响应。 ICD断开 9 控件正在断开与主机的连接。 ICD断开 10 控件已成功断开与主机的连接。 冰河 11 与主机通信时出错。 ICR响应已完成 12 请求已完成，所有数据均已收到。

---

我认为你没有添加足够的代码。。。了解表格1和表格2之间的联系；您可以添加来自form2的完整的StateChanged事件处理程序，以及来自form1的计时器代码吗？只是猜测一下，但这可能是一个有用的示例：如果form1再次收到焦点，这是因为（很可能）计时器事件中的代码导致了它。正如@StayOnTarget已经提到的：没有显示足够的代码。至于如何执行

Inet1\u StateChanged

，这是一个事件。通常情况下，您不会直接执行这些，而是您的代码所做的事情或外部因素触发事件，然后事件将执行您在该事件的过程中编写的代码。就像一个命令按钮的点击事件一样，

Command1\u click（）

会被点击触发。