If ValidateData() = False Then Exit Sub End If If UpdateData() Then If MyMode = "Add" Then MsgBox("New Activity Added Successfully !", CType(vbInformation + vbOKOnly, MsgBoxStyle), "Update Status") PopulateList() ClearMyCtls() txtStudentID.Text = GetNextPrimaryKey(con, "Activity", "Activity_ID").ToString("######000") txtStudentID.Focus() Exit Sub End If
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)