Shoutbox

Ok well the code for that form starts like

code:

---

Private Sub main1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

---

Then my

code:

---

If My.Computer.Network.Ping("xx.xxx.xx.xx") Then
            PictureBox1.Show()
        Else
            PictureBox10.Show()
        End If

---

(there more than one)

It ends with the usual

code:

---

End Sub

---

How do i add it in? I can't seem to do it without errors