Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub btnSubmit_Click(sender As Object, e As EventArgs) Handles btnSubmit.Click
- On Error GoTo saveErr
- RequestSoftwareBindingSource.EndEdit()
- RequestSoftwareTableAdapter.Update(FYPDataSet.RequestSoftware)
- MessageBox.Show("Your request has been submitted.", "Thank you", MessageBoxButtons.OK, MessageBoxIcon.Information)
- saveErr:
- txtName.Text = ""
- txtDate.Text = ""
- txtSubject.Text = ""
- txtSoftware.Text = ""
- txtLabNum.Text = ""
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement