Opened 10 years ago

#29 new enhancement

Objasnuvanje na kod za formata Add_patient

Reported-by: Dragana Stojanovska Owned by:
Priority: major Milestone: milestone2
Component: component1 Version:
Keywords: Cc:

Description

Formata Pocetna preku kopceto za dodavanje na nov pacient e povrzana so formata ADD_Patient koja sluzi za dodavanje na nov pacient. Vo ovaa forma imame staveno poveke edit i za vnesuvanje na tekst spored potrebnite inormacii za pacientite Pri vnesuvanje na potrebnite podatoci za nivno zacuvuvanje vo bazata na podatoci imame staveno funkcija za zacuvuvanje na podatocite preku kopceto save i nastanot btnSave_Click so opredeluvanje na koi podatoci se od tipot integer a koi od tipot string i so postavuvanje na soodvetni poraki. Pr. za kodot If Integer.TryParse(txtEMBG.Text, Identificationnr) = False Then

MessageBox.Show("Invalid value entered for Patient ID, it must be number")
txtEMBG.Focus()
txtEMBG.SelectAll()
Exit Sub

Dokolku za id ili za embg se stavi string ke se pojavi na ekranot porakata deka e potrebno podatocite da bidat integer. Takvi funkcii imame napraveno poveke za potrebnoto vnesuvanje na teksotot pri popolnuvanje za dodavanje na nov pacient. Preku kopceto clear imame napravno funkcija btnClear_Click kade site podatoci pri pritiskanje na kopceto clear da se izbrisat. Toa go napravivme so sledniot kod> Me.txtEMBG.Text = ""

Me.txtCity.Text = ""
Me.txtPname.Text = ""
Me.txtPsurname.Text = ""
Me.txtAddress.Text = ""
Me.txtEMBG.Tag = ""
Me.txthomeph.Text = ""
Me.txtworkph.Text = ""
Me.txtEmail.Text = ""
Me.txtOther.Text = ""
Me.txtProfession.Text = ""
Me.txtIorder.Text = "" Odnosno site podatoci so slednive polinja da bidat ednakvi na prazni mesta - izbirsani.

Na kopceto close imame napraveno funkcija za izlez od ovaa forma.
Na kopceto Back funkcija za izlez od formata i prikaz na pocetnata strana preku funkcijata Pocetna.Show().

Change History (0)

Note: See TracTickets for help on using tickets.