Public Class frmInternational

    Private Sub radEnglish_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles radEnglish.CheckedChanged
        Me.lblName.Text = "My Name is:"
    End Sub

    Private Sub radSpanish_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles radSpanish.CheckedChanged
        Me.lblName.Text = "Me nombrea es:"
    End Sub

    Private Sub radFrench_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles radFrench.CheckedChanged
        Me.lblName.Text = "Je m'appelle:"
    End Sub
End Class