Dart.Sockets Namespace : PingSlave Class |
'Declaration Public Class PingSlave
'Usage Dim instance As PingSlave
public class PingSlave
public __gc class PingSlave
public ref class PingSlave
private void button1_Click(object sender, EventArgs e) { ping1.Start(pingWorker, HostNameOrAddressToPingTextbox.Text); } private void pingWorker(PingSlave slave, object state) { ping1.Marshal(slave.GetEchoes(new Dart.Sockets.IPEndPoint(state.ToString(), 0).Address, null, 20, 5000, false)); } void ping1_Echo(object sender, EchoEventArgs e) { string results = "The following echoes were returned:\r\n"; for (int i = 0; i < e.Echoes.Length; i++) results += e.Echoes[i].ToString() + "\r\n"; textBox1.AppendText(results); }
Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) ping1.Start(AddressOf pingWorker, HostNameOrAddressToPingTextbox.Text) End Sub Private Sub pingWorker(ByVal slave As PingSlave, ByVal state As Object) ping1.Marshal(slave.GetEchoes((New Dart.Sockets.IPEndPoint(state.ToString(), 0)).Address, Nothing, 20, 5000, False)) End Sub Private Sub ping1_Echo(ByVal sender As Object, ByVal e As EchoEventArgs) Dim results As String = "The following echoes were returned:" & vbCrLf For i As Integer = 0 To e.Echoes.Length - 1 results &= e.Echoes(i).ToString() & vbCrLf Next i textBox1.AppendText(results) End Sub
System.Object
Dart.Sockets.PingSlave