Lab

LAB 1


 * Back ground**

Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub End Class


 * Name**

Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub LBLDISPLAYNAME_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LBLDISPLAYNAME.Click End Sub End Class


 * BirthDate**

Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub LBLDISPLAYNAME_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LBLDISPLAYNAME.Click End Sub Private Sub LBLBIRTHDAY_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LBLBIRTHDAY.Click End Sub End Class