class admin Private Sub btnregister_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnregister.Click If Me.NAMETextBox.Text.Trim.Length = 0 Then MessageBox.Show(" Please Enter Fullname") Me.NAMETextBox.Focus() ElseIf ADDRESSTextBox1.Text.Trim.Length = 0 Then MessageBox.Show("Please Enter Address ") Me.ADDRESSTextBox1.Focus() ElseIf DEPARTMENTComboBox1.Text.Trim.Length = 0 Then MessageBox.Show("Please Choose Department") Me.DEPARTMENTComboBox1.Focus() ElseIf USERNAMETextBox1.Text.Trim.Length = 0 Then MessageBox.Show("Please Enter Username") Me.USERNAMETextBox1.Focus() ElseIf PASSWORDTextBox.Text.Trim.Length = 0 Then MessageBox.Show("Please Enter Password") Me.PASSWORDTextBox.Focus() End If Me.StaffTableAdapter.Insert(Me.NAMETextBox.Text, Me.DEPARTMENTComboBox1.Text, Me.I_CTextBox.Text, Me.USERNAMETextBox1.Text, Me.PASSWORDTextBox.Text, Me.ADDRESSTextBox1.Text, Today.Date.ToShortDateString, Today.Date.ToShortDateString) Me.StaffTableAdapter.Fill(Me.LoginDataSet.staff) end sub end class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)