|
Public Class Down
Public Sub DownRun()
s=xxx
我想在些处触发MAIN中的XinXi事件,并把参数S传过去
end sub
end class
public class main
Event XinXi(ByVal sender As Object, ByVal s As String)
private sub a
dim r as new down
Dim t As New System.Threading.Thread(AddressOf r.DownRun)
t.Start()
end sub |
|