VB Assignment Clinic Appointment
This form is Patient Information for staff to enter patients details such
as patient id, patient name, patient gender, patient ic, patient contact no and
patient email. Besides
that, we set few button at the bottom for easy way to key in record, delete
record or switch to other page. Those buttons such as Main, delete record, add
record, save record, search record and proceed to appointment form button. It’s
useful because we can proceed to next form or switch back to that form easily. The
advantage that we design this form is to reduce data redundancy and save time.
It can avoid our database appear repeated data.
This is a complete report that show all patients information such as
patient id, patient name, patient gender, patient contact no, patient email. The advantage come out of this report is for
staff to view their clinic have how many patient.
This form is Staff Information for staff to enter staff details such as
staff id, staff name, staff gender, staff ic, staff contact no and staff email.
The advantage that we
design this form is to reduce data redundancy and save time. It can avoid our
database appear repeated data
This report complete to show staff detail such as staff id, staff name,
staff contact no, staff email. The advantage come out of this report is easy for
clinic keep track staff. For example, some emergency case needs immediacy
calling staff come back clinic
This form is about Patient Appointment. We can enter a unique appointment
code, patient id, staff id, appointment date and appointment reason. At the
same time, we use combo box in Staff ID, so that when adding new staff the
system will automatically update on Appointment form. The advantage come out with this form is measure
appointment time with no collision happens
This report clearly list out all the staff and every day of patient
appointment such as staff id, patient id, appointment id, appointment date,
appointment reason. The
advantage come out of this report is for staff to explicitly view their appointment at which date
and the patient appointment reason
Sample VB code showing appointment in dialog :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click PrintDialog1.Document = PrintDocument1 PrintDialog1.PrinterSettings = PrintDocument1.PrinterSettings PrintDialog1.AllowSomePages = True If PrintDialog1.ShowDialog = DialogResult.OK Then PrintDocument1.PrinterSettings = PrintDialog1.PrinterSettings PrintDocument1.Print() End If End Sub
0 comments