Recent content by Kevin Carl

Here is the code: Private Sub cmdDelete_Click() If MsgBox("Are you sure you want to delete this room?", vbYesNo, "Delete Room") = vbYes Then conn.Execute "DELETE * FROM Room where rm_no = '" & txtRoom & "'" rs.Requery Set dgRoom.DataSource = rs MsgBox "Room successfully...