How to ping a machine in VB .net

[richy12312]

this is what i used

If My.Computer.Network.Ping(TextBox3.Text) Then
            Label5.Text = ("Ping was successful")
            Exit Sub
        Else
            Label5.Text = ("Ping failed")
            Exit Sub
        End If