id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
32	Objasnuvanje na kod za formata Labanalyses	139037		"'''Formata  za dodavanje na nov rezultati za labanalyses e povrzana so formata Patient koja sluzi za dodavanje na novi analizi. Vo ovaa forma imame staveno edit za vnesuvanje na rezultatite na analizi spored rezulatite.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'''

'''(codod za save button)''' Private Sub btnSave_Click(ByVal? sender As System.Object, ByVal? e As System.EventArgs?) Handles btnSave.Click) 

'''so opredeluvanje na koi podatoci se od tipot integer ,od tipot string,i datum na analizite'''. 
'''codot za datum na aanliza so backcolor  -'''  Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
        DateTimePicker1.BackColor = Color.Brown
    End Sub





'''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 = """"'''

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Me.txtHematocrit.Text = """"
        Me.txtHemaglobin.Text = """"
        Me.txtErytocytes.Text = """"
        Me.txtLeukocytes.Text = """"
        Me.txtTrombocytes.Text = """"
        Me.txtLymphocytes.Tag = """"
        Me.TextBox2.Text = """"
        Me.DateTimePicker1.Text = """"

 '''Odnosno site podatoci so slednive polinja da bidat ednakvi na prazni mesta - izbirsani.'''

        
 '''   (kaj sekoj text box koristvem cod koja ja menuva bojata na textboxot  ovije se codovite shto sme koristele codot za menuvanje na bojata)'''

    Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
        TextBox2.BackColor = Color.Brown
    End Sub

    Private Sub txtHematocrit_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtHematocrit.TextChanged
        txtHematocrit.BackColor = Color.Brown
    End Sub

    Private Sub txtHemaglobin_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtHemaglobin.TextChanged
        txtHemaglobin.BackColor = Color.Brown
    End Sub

    Private Sub txtErytocytes_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtErytocytes.TextChanged
        txtErytocytes.BackColor = Color.Brown
    End Sub

    Private Sub txtLeukocytes_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtLeukocytes.TextChanged
        txtLeukocytes.BackColor = Color.Brown
    End Sub

    Private Sub txtTrombocytes_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtTrombocytes.TextChanged
        txtTrombocytes.BackColor = Color.Brown
    End Sub

    Private Sub txtLymphocytes_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtLymphocytes.TextChanged
        txtLymphocytes.BackColor = Color.Brown
    End Sub"	enhancement	new	major		component1