VB中从一个新的窗口怎么调用其他窗口里面的数据发送过程

VB中从一个新的窗口怎么调用其他窗口里面的数据发送过程,谢谢！

Private Sub Timer1_Timer()
On Error Resume Next
If tTel(XJSBhaoma).tErr = -1 Then 
  If (XJSBhaoma) = 4 Then
  Call send_zk_data(1, 1)/////********就是这边会出错，这一个过程写在另一个窗口下****
  End If
  FJXJZhuangtai(XJSBhaoma) = "巡检失败"
End If
End Sub

把你的“其他窗口里面的数据发送过程”声明成 Public，然后这样调用：
窗口名.过程名 参数1,参数2,...,参数n
如：
Form2.send_zk_data 1, 1

不过你的 send_zk_data 要声明成 Public 如：
Public Sub send_zk_data(a As Long, B As Long)