Приветствие

Public Class frm1

Private Sub BT1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT1.Click

LB1.Text = "Здравствуй Лена"

End Sub

Private Sub BT2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BT2.Click

LB1.Text = "Досвидания Лена"

End Sub

End Class