vb.net2015_slip17

Public Class Form1

    Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        Label1.Text = txtName.Text
        Label2.Text = txtFathersName.Text
        Label3.Text = txtMothersName.Text
        Label4.Text = cmbCourse.Text
        If optMale.Checked = True Then
            Label5.Text = "Male"
        Else
            Label5.Text = "Female"
        End If
        Label6.Text = DateTimePicker1.Value
        Label7.Text = txtHobbies.Text
        Label8.Text = txtContact.Text

    End Sub
End Class