class= " lineNumbers " del
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
|
class= del
el class= lstPtName_Click secundario del >Private " notpretty " (remitente del id= " codeSnippet791938 " del 0 entonces
Me.BindingContext (dsPatient.Tables (“pacientes”)). Posición = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posición - 1
Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posición + 1
Terminar si
Terminar el submarino
El btnFirst_Click secundario privado (remitente de ByVal como objeto, ByVal e como System.EventArgs) dirige btnFirst.Click
Me.BindingContext (dsPatient.Tables (“pacientes”)). Posición = 0
Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posición + 1
Submarino del extremo
LoadPtData secundario ()
dsPatient.Clear ()
daPatient dévil como nuevo SqlClient.SqlDataAdapter (“SELECCIONAR * de RawData DONDE PtName = “” y lstPtName.Text y “” “, las conec)
Intento
conec. Abrirse ()
dapatient. Llenar (dsPatient, “pacientes”)
conec. Se cierran ()
Retén ex como excepción
MsgBox (ex. Mensaje)
Intento del final
Si txtPtName.DataBindings.Count = 0 entonces
txtPtName.DataBindings.Add (“texto”, dsPatient, “Patients.PtName”)
txtDOB.DataBindings.Add (“texto”, dsPatient, “Patients.PtDOB”, verdad, DataSourceUpdateMode.OnPropertyChanged, nada, “DD MMM, yyyy”)
txtSex.DataBindings.Add (“texto”, dsPatient, “Patients.PtSex”)
txtPhys.DataBindings.Add (“texto”, dsPatient, “Patients.PhyName”)
txtTest.DataBindings.Add (“texto”, dsPatient, “Patients.Test”)
txtResult.DataBindings.Add (“texto”, dsPatient, “Patients.Result”)
txtUOM.DataBindings.Add (“texto”, dsPatient, “Patients.UOM”)
txtCollDate.DataBindings.Add (“texto”, dsPatient, “Patients.CollectDate”, verdad, DataSourceUpdateMode.OnPropertyChanged, nada, “DD MMM, yyyy”)
txtCollTime.DataBindings.Add (“texto”, dsPatient, “Patients.CollectTime”)
Terminar si
Terminar el submarino
|