_ Partial Class PatientDetails Inherits System.Windows.Forms.UserControl 'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.txtnrprivat = New System.Windows.Forms.TextBox() Me.lblNr = New System.Windows.Forms.Label() Me.lblAnrede = New System.Windows.Forms.Label() Me.lblTitel = New System.Windows.Forms.Label() Me.txtMutierer = New System.Windows.Forms.TextBox() Me.txtMutiert_am = New System.Windows.Forms.TextBox() Me.txtErstellt_am = New System.Windows.Forms.TextBox() Me.Label18 = New System.Windows.Forms.Label() Me.Label17 = New System.Windows.Forms.Label() Me.Label16 = New System.Windows.Forms.Label() Me.Label15 = New System.Windows.Forms.Label() Me.Label14 = New System.Windows.Forms.Label() Me.Label13 = New System.Windows.Forms.Label() Me.chklbAdresstyp = New System.Windows.Forms.CheckedListBox() Me.txtBemerkung = New System.Windows.Forms.TextBox() Me.Label2 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.txtFaxG = New System.Windows.Forms.TextBox() Me.txtName = New System.Windows.Forms.TextBox() Me.lbltelg = New System.Windows.Forms.Label() Me.lblName = New System.Windows.Forms.Label() Me.txtTelg = New System.Windows.Forms.TextBox() Me.txtVorname = New System.Windows.Forms.TextBox() Me.lblahv = New System.Windows.Forms.Label() Me.txtahvnr = New System.Windows.Forms.TextBox() Me.lblVorname = New System.Windows.Forms.Label() Me.lblBeruf = New System.Windows.Forms.Label() Me.txtBeruf = New System.Windows.Forms.TextBox() Me.txtCOAdresse = New System.Windows.Forms.TextBox() Me.lblArbeitgeber = New System.Windows.Forms.Label() Me.lblCO = New System.Windows.Forms.Label() Me.txtStrasse = New System.Windows.Forms.TextBox() Me.lblSprache = New System.Windows.Forms.Label() Me.lblStrasse = New System.Windows.Forms.Label() Me.txtPLZ = New System.Windows.Forms.TextBox() Me.lblStatus = New System.Windows.Forms.Label() Me.lblPLZOrt = New System.Windows.Forms.Label() Me.lblBriefanrede = New System.Windows.Forms.Label() Me.txtOrt = New System.Windows.Forms.TextBox() Me.txtBriefanrede = New System.Windows.Forms.TextBox() Me.lblGebDat = New System.Windows.Forms.Label() Me.lblGeschlecht = New System.Windows.Forms.Label() Me.txttelp = New System.Windows.Forms.TextBox() Me.lblInternet = New System.Windows.Forms.Label() Me.lblTelefon = New System.Windows.Forms.Label() Me.txtWeb = New System.Windows.Forms.TextBox() Me.txtFaxp = New System.Windows.Forms.TextBox() Me.lblemail = New System.Windows.Forms.Label() Me.lblFaxP = New System.Windows.Forms.Label() Me.txtE_Mail = New System.Windows.Forms.TextBox() Me.txtNatel = New System.Windows.Forms.TextBox() Me.lblMobile = New System.Windows.Forms.Label() Me.dtgebdat = New System.Windows.Forms.DateTimePicker() Me.dtGueltigab = New System.Windows.Forms.DateTimePicker() Me.dtgueltigbis = New System.Windows.Forms.DateTimePicker() Me.Label3 = New System.Windows.Forms.Label() Me.cbtxtboxKanton = New System.Windows.Forms.ComboBox() Me.lblGLN = New System.Windows.Forms.Label() Me.txtGLN = New System.Windows.Forms.TextBox() Me.txtZSR = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() Me.chkMail_Kommunikation = New System.Windows.Forms.CheckBox() Me.cbboxNRArbeitgeber = New DPM2016.MyCombobox() Me.cbboxGeschlecht = New DPM2016.MyCombobox() Me.cbboxSprache = New DPM2016.MyCombobox() Me.cbboxStatus = New DPM2016.MyCombobox() Me.cbboxNRTitel = New DPM2016.MyCombobox() Me.cbboxNrAnrede = New DPM2016.MyCombobox() Me.SuspendLayout() ' 'txtnrprivat ' Me.txtnrprivat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtnrprivat.Location = New System.Drawing.Point(74, 14) Me.txtnrprivat.Name = "txtnrprivat" Me.txtnrprivat.ReadOnly = True Me.txtnrprivat.RightToLeft = System.Windows.Forms.RightToLeft.Yes Me.txtnrprivat.Size = New System.Drawing.Size(48, 20) Me.txtnrprivat.TabIndex = 0 ' 'lblNr ' Me.lblNr.AutoSize = True Me.lblNr.BackColor = System.Drawing.Color.Transparent Me.lblNr.Location = New System.Drawing.Point(4, 16) Me.lblNr.Name = "lblNr" Me.lblNr.Size = New System.Drawing.Size(21, 13) Me.lblNr.TabIndex = 103 Me.lblNr.Text = "Nr." ' 'lblAnrede ' Me.lblAnrede.AutoSize = True Me.lblAnrede.BackColor = System.Drawing.Color.Transparent Me.lblAnrede.Location = New System.Drawing.Point(4, 41) Me.lblAnrede.Name = "lblAnrede" Me.lblAnrede.Size = New System.Drawing.Size(41, 13) Me.lblAnrede.TabIndex = 104 Me.lblAnrede.Text = "Anrede" ' 'lblTitel ' Me.lblTitel.AutoSize = True Me.lblTitel.BackColor = System.Drawing.Color.Transparent Me.lblTitel.Location = New System.Drawing.Point(4, 68) Me.lblTitel.Name = "lblTitel" Me.lblTitel.Size = New System.Drawing.Size(27, 13) Me.lblTitel.TabIndex = 105 Me.lblTitel.Text = "Titel" ' 'txtMutierer ' Me.txtMutierer.Location = New System.Drawing.Point(586, 257) Me.txtMutierer.Name = "txtMutierer" Me.txtMutierer.ReadOnly = True Me.txtMutierer.RightToLeft = System.Windows.Forms.RightToLeft.Yes Me.txtMutierer.Size = New System.Drawing.Size(135, 20) Me.txtMutierer.TabIndex = 207 ' 'txtMutiert_am ' Me.txtMutiert_am.Location = New System.Drawing.Point(586, 234) Me.txtMutiert_am.Name = "txtMutiert_am" Me.txtMutiert_am.ReadOnly = True Me.txtMutiert_am.Size = New System.Drawing.Size(135, 20) Me.txtMutiert_am.TabIndex = 206 ' 'txtErstellt_am ' Me.txtErstellt_am.Location = New System.Drawing.Point(586, 212) Me.txtErstellt_am.Name = "txtErstellt_am" Me.txtErstellt_am.ReadOnly = True Me.txtErstellt_am.Size = New System.Drawing.Size(135, 20) Me.txtErstellt_am.TabIndex = 205 ' 'Label18 ' Me.Label18.AutoSize = True Me.Label18.BackColor = System.Drawing.Color.Transparent Me.Label18.Location = New System.Drawing.Point(527, 260) Me.Label18.Name = "Label18" Me.Label18.Size = New System.Drawing.Size(45, 13) Me.Label18.TabIndex = 204 Me.Label18.Text = "Mutierer" ' 'Label17 ' Me.Label17.AutoSize = True Me.Label17.BackColor = System.Drawing.Color.Transparent Me.Label17.Location = New System.Drawing.Point(527, 237) Me.Label17.Name = "Label17" Me.Label17.Size = New System.Drawing.Size(56, 13) Me.Label17.TabIndex = 203 Me.Label17.Text = "Mutiert am" ' 'Label16 ' Me.Label16.AutoSize = True Me.Label16.BackColor = System.Drawing.Color.Transparent Me.Label16.Location = New System.Drawing.Point(528, 215) Me.Label16.Name = "Label16" Me.Label16.Size = New System.Drawing.Size(55, 13) Me.Label16.TabIndex = 202 Me.Label16.Text = "Erstellt am" ' 'Label15 ' Me.Label15.AutoSize = True Me.Label15.BackColor = System.Drawing.Color.Transparent Me.Label15.Location = New System.Drawing.Point(272, 280) Me.Label15.Name = "Label15" Me.Label15.Size = New System.Drawing.Size(50, 13) Me.Label15.TabIndex = 201 Me.Label15.Text = "Gültig bis" ' 'Label14 ' Me.Label14.AutoSize = True Me.Label14.BackColor = System.Drawing.Color.Transparent Me.Label14.Location = New System.Drawing.Point(272, 256) Me.Label14.Name = "Label14" Me.Label14.Size = New System.Drawing.Size(49, 13) Me.Label14.TabIndex = 200 Me.Label14.Text = "Gültig ab" ' 'Label13 ' Me.Label13.AutoSize = True Me.Label13.BackColor = System.Drawing.Color.Transparent Me.Label13.Location = New System.Drawing.Point(527, 42) Me.Label13.Name = "Label13" Me.Label13.Size = New System.Drawing.Size(53, 13) Me.Label13.TabIndex = 199 Me.Label13.Text = "Adresstyp" ' 'chklbAdresstyp ' Me.chklbAdresstyp.FormattingEnabled = True Me.chklbAdresstyp.Items.AddRange(New Object() {"Patient", "Garant", "Zahnarzt", "Ges. Vertreter", "Hausarzt", "Behandler", "DH-Patient", "Nicht annehmen", "Nicht aufbieten", "Betreibung vorhanden"}) Me.chklbAdresstyp.Location = New System.Drawing.Point(586, 39) Me.chklbAdresstyp.Name = "chklbAdresstyp" Me.chklbAdresstyp.Size = New System.Drawing.Size(137, 154) Me.chklbAdresstyp.TabIndex = 30 ' 'txtBemerkung ' Me.txtBemerkung.Location = New System.Drawing.Point(275, 327) Me.txtBemerkung.Multiline = True Me.txtBemerkung.Name = "txtBemerkung" Me.txtBemerkung.Size = New System.Drawing.Size(446, 101) Me.txtBemerkung.TabIndex = 29 ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.BackColor = System.Drawing.Color.Transparent Me.Label2.Location = New System.Drawing.Point(272, 307) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(61, 13) Me.Label2.TabIndex = 198 Me.Label2.Text = "Bemerkung" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.BackColor = System.Drawing.Color.Transparent Me.Label1.Location = New System.Drawing.Point(272, 226) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(38, 13) Me.Label1.TabIndex = 197 Me.Label1.Text = "Fax G." ' 'txtFaxG ' Me.txtFaxG.Location = New System.Drawing.Point(342, 223) Me.txtFaxG.Name = "txtFaxG" Me.txtFaxG.Size = New System.Drawing.Size(162, 20) Me.txtFaxG.TabIndex = 26 ' 'txtName ' Me.txtName.Location = New System.Drawing.Point(74, 93) Me.txtName.Name = "txtName" Me.txtName.Size = New System.Drawing.Size(162, 20) Me.txtName.TabIndex = 3 ' 'lbltelg ' Me.lbltelg.AutoSize = True Me.lbltelg.BackColor = System.Drawing.Color.Transparent Me.lbltelg.Location = New System.Drawing.Point(272, 200) Me.lbltelg.Name = "lbltelg" Me.lbltelg.Size = New System.Drawing.Size(57, 13) Me.lbltelg.TabIndex = 196 Me.lbltelg.Text = "Telefon G." ' 'lblName ' Me.lblName.AutoSize = True Me.lblName.BackColor = System.Drawing.Color.Transparent Me.lblName.Location = New System.Drawing.Point(4, 96) Me.lblName.Name = "lblName" Me.lblName.Size = New System.Drawing.Size(35, 13) Me.lblName.TabIndex = 178 Me.lblName.Text = "Name" ' 'txtTelg ' Me.txtTelg.Location = New System.Drawing.Point(342, 197) Me.txtTelg.Name = "txtTelg" Me.txtTelg.Size = New System.Drawing.Size(162, 20) Me.txtTelg.TabIndex = 25 ' 'txtVorname ' Me.txtVorname.Location = New System.Drawing.Point(74, 119) Me.txtVorname.Name = "txtVorname" Me.txtVorname.Size = New System.Drawing.Size(162, 20) Me.txtVorname.TabIndex = 4 ' 'lblahv ' Me.lblahv.AutoSize = True Me.lblahv.BackColor = System.Drawing.Color.Transparent Me.lblahv.Location = New System.Drawing.Point(272, 148) Me.lblahv.Name = "lblahv" Me.lblahv.Size = New System.Drawing.Size(43, 13) Me.lblahv.TabIndex = 195 Me.lblahv.Text = "AHV-Nr" ' 'txtahvnr ' Me.txtahvnr.Location = New System.Drawing.Point(342, 145) Me.txtahvnr.Name = "txtahvnr" Me.txtahvnr.Size = New System.Drawing.Size(162, 20) Me.txtahvnr.TabIndex = 22 ' 'lblVorname ' Me.lblVorname.AutoSize = True Me.lblVorname.BackColor = System.Drawing.Color.Transparent Me.lblVorname.Location = New System.Drawing.Point(4, 122) Me.lblVorname.Name = "lblVorname" Me.lblVorname.Size = New System.Drawing.Size(49, 13) Me.lblVorname.TabIndex = 179 Me.lblVorname.Text = "Vorname" ' 'lblBeruf ' Me.lblBeruf.AutoSize = True Me.lblBeruf.BackColor = System.Drawing.Color.Transparent Me.lblBeruf.Location = New System.Drawing.Point(272, 122) Me.lblBeruf.Name = "lblBeruf" Me.lblBeruf.Size = New System.Drawing.Size(32, 13) Me.lblBeruf.TabIndex = 194 Me.lblBeruf.Text = "Beruf" ' 'txtBeruf ' Me.txtBeruf.Location = New System.Drawing.Point(342, 119) Me.txtBeruf.Name = "txtBeruf" Me.txtBeruf.Size = New System.Drawing.Size(162, 20) Me.txtBeruf.TabIndex = 21 ' 'txtCOAdresse ' Me.txtCOAdresse.Location = New System.Drawing.Point(74, 145) Me.txtCOAdresse.Name = "txtCOAdresse" Me.txtCOAdresse.Size = New System.Drawing.Size(162, 20) Me.txtCOAdresse.TabIndex = 5 ' 'lblArbeitgeber ' Me.lblArbeitgeber.AutoSize = True Me.lblArbeitgeber.BackColor = System.Drawing.Color.Transparent Me.lblArbeitgeber.Location = New System.Drawing.Point(272, 96) Me.lblArbeitgeber.Name = "lblArbeitgeber" Me.lblArbeitgeber.Size = New System.Drawing.Size(61, 13) Me.lblArbeitgeber.TabIndex = 193 Me.lblArbeitgeber.Text = "Arbeitgeber" ' 'lblCO ' Me.lblCO.AutoSize = True Me.lblCO.BackColor = System.Drawing.Color.Transparent Me.lblCO.Location = New System.Drawing.Point(4, 148) Me.lblCO.Name = "lblCO" Me.lblCO.Size = New System.Drawing.Size(27, 13) Me.lblCO.TabIndex = 180 Me.lblCO.Text = "C/O" ' 'txtStrasse ' Me.txtStrasse.Location = New System.Drawing.Point(74, 171) Me.txtStrasse.Name = "txtStrasse" Me.txtStrasse.Size = New System.Drawing.Size(162, 20) Me.txtStrasse.TabIndex = 6 ' 'lblSprache ' Me.lblSprache.AutoSize = True Me.lblSprache.BackColor = System.Drawing.Color.Transparent Me.lblSprache.Location = New System.Drawing.Point(272, 69) Me.lblSprache.Name = "lblSprache" Me.lblSprache.Size = New System.Drawing.Size(47, 13) Me.lblSprache.TabIndex = 192 Me.lblSprache.Text = "Sprache" ' 'lblStrasse ' Me.lblStrasse.AutoSize = True Me.lblStrasse.BackColor = System.Drawing.Color.Transparent Me.lblStrasse.Location = New System.Drawing.Point(4, 174) Me.lblStrasse.Name = "lblStrasse" Me.lblStrasse.Size = New System.Drawing.Size(42, 13) Me.lblStrasse.TabIndex = 181 Me.lblStrasse.Text = "Strasse" ' 'txtPLZ ' Me.txtPLZ.Location = New System.Drawing.Point(74, 197) Me.txtPLZ.Name = "txtPLZ" Me.txtPLZ.Size = New System.Drawing.Size(48, 20) Me.txtPLZ.TabIndex = 7 ' 'lblStatus ' Me.lblStatus.AutoSize = True Me.lblStatus.BackColor = System.Drawing.Color.Transparent Me.lblStatus.Location = New System.Drawing.Point(272, 42) Me.lblStatus.Name = "lblStatus" Me.lblStatus.Size = New System.Drawing.Size(37, 13) Me.lblStatus.TabIndex = 191 Me.lblStatus.Text = "Status" ' 'lblPLZOrt ' Me.lblPLZOrt.AutoSize = True Me.lblPLZOrt.BackColor = System.Drawing.Color.Transparent Me.lblPLZOrt.Location = New System.Drawing.Point(4, 200) Me.lblPLZOrt.Name = "lblPLZOrt" Me.lblPLZOrt.Size = New System.Drawing.Size(46, 13) Me.lblPLZOrt.TabIndex = 182 Me.lblPLZOrt.Text = "PLZ/Ort" ' 'lblBriefanrede ' Me.lblBriefanrede.AutoSize = True Me.lblBriefanrede.BackColor = System.Drawing.Color.Transparent Me.lblBriefanrede.Location = New System.Drawing.Point(4, 435) Me.lblBriefanrede.Name = "lblBriefanrede" Me.lblBriefanrede.Size = New System.Drawing.Size(65, 13) Me.lblBriefanrede.TabIndex = 190 Me.lblBriefanrede.Text = "Brief-Anrede" ' 'txtOrt ' Me.txtOrt.Location = New System.Drawing.Point(128, 197) Me.txtOrt.Name = "txtOrt" Me.txtOrt.Size = New System.Drawing.Size(108, 20) Me.txtOrt.TabIndex = 8 ' 'txtBriefanrede ' Me.txtBriefanrede.Location = New System.Drawing.Point(74, 432) Me.txtBriefanrede.Name = "txtBriefanrede" Me.txtBriefanrede.Size = New System.Drawing.Size(647, 20) Me.txtBriefanrede.TabIndex = 17 ' 'lblGebDat ' Me.lblGebDat.AutoSize = True Me.lblGebDat.BackColor = System.Drawing.Color.Transparent Me.lblGebDat.Location = New System.Drawing.Point(4, 253) Me.lblGebDat.Name = "lblGebDat" Me.lblGebDat.Size = New System.Drawing.Size(44, 13) Me.lblGebDat.TabIndex = 183 Me.lblGebDat.Text = "GebDat" ' 'lblGeschlecht ' Me.lblGeschlecht.AutoSize = True Me.lblGeschlecht.BackColor = System.Drawing.Color.Transparent Me.lblGeschlecht.Location = New System.Drawing.Point(4, 408) Me.lblGeschlecht.Name = "lblGeschlecht" Me.lblGeschlecht.Size = New System.Drawing.Size(61, 13) Me.lblGeschlecht.TabIndex = 189 Me.lblGeschlecht.Text = "Geschlecht" ' 'txttelp ' Me.txttelp.Location = New System.Drawing.Point(74, 275) Me.txttelp.Name = "txttelp" Me.txttelp.Size = New System.Drawing.Size(162, 20) Me.txttelp.TabIndex = 11 ' 'lblInternet ' Me.lblInternet.AutoSize = True Me.lblInternet.BackColor = System.Drawing.Color.Transparent Me.lblInternet.Location = New System.Drawing.Point(4, 382) Me.lblInternet.Name = "lblInternet" Me.lblInternet.Size = New System.Drawing.Size(43, 13) Me.lblInternet.TabIndex = 188 Me.lblInternet.Text = "Internet" ' 'lblTelefon ' Me.lblTelefon.AutoSize = True Me.lblTelefon.BackColor = System.Drawing.Color.Transparent Me.lblTelefon.Location = New System.Drawing.Point(4, 278) Me.lblTelefon.Name = "lblTelefon" Me.lblTelefon.Size = New System.Drawing.Size(55, 13) Me.lblTelefon.TabIndex = 184 Me.lblTelefon.Text = "Telefon p." ' 'txtWeb ' Me.txtWeb.Location = New System.Drawing.Point(74, 379) Me.txtWeb.Name = "txtWeb" Me.txtWeb.Size = New System.Drawing.Size(162, 20) Me.txtWeb.TabIndex = 15 ' 'txtFaxp ' Me.txtFaxp.Location = New System.Drawing.Point(74, 301) Me.txtFaxp.Name = "txtFaxp" Me.txtFaxp.Size = New System.Drawing.Size(162, 20) Me.txtFaxp.TabIndex = 12 ' 'lblemail ' Me.lblemail.AutoSize = True Me.lblemail.BackColor = System.Drawing.Color.Transparent Me.lblemail.Location = New System.Drawing.Point(4, 356) Me.lblemail.Name = "lblemail" Me.lblemail.Size = New System.Drawing.Size(36, 13) Me.lblemail.TabIndex = 187 Me.lblemail.Text = "E-Mail" ' 'lblFaxP ' Me.lblFaxP.AutoSize = True Me.lblFaxP.BackColor = System.Drawing.Color.Transparent Me.lblFaxP.Location = New System.Drawing.Point(4, 304) Me.lblFaxP.Name = "lblFaxP" Me.lblFaxP.Size = New System.Drawing.Size(36, 13) Me.lblFaxP.TabIndex = 185 Me.lblFaxP.Text = "Fax p." ' 'txtE_Mail ' Me.txtE_Mail.Location = New System.Drawing.Point(74, 353) Me.txtE_Mail.Name = "txtE_Mail" Me.txtE_Mail.Size = New System.Drawing.Size(162, 20) Me.txtE_Mail.TabIndex = 14 ' 'txtNatel ' Me.txtNatel.Location = New System.Drawing.Point(74, 327) Me.txtNatel.Name = "txtNatel" Me.txtNatel.Size = New System.Drawing.Size(162, 20) Me.txtNatel.TabIndex = 13 ' 'lblMobile ' Me.lblMobile.AutoSize = True Me.lblMobile.BackColor = System.Drawing.Color.Transparent Me.lblMobile.Location = New System.Drawing.Point(4, 330) Me.lblMobile.Name = "lblMobile" Me.lblMobile.Size = New System.Drawing.Size(38, 13) Me.lblMobile.TabIndex = 186 Me.lblMobile.Text = "Mobile" ' 'dtgebdat ' Me.dtgebdat.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtgebdat.Location = New System.Drawing.Point(74, 247) Me.dtgebdat.Name = "dtgebdat" Me.dtgebdat.Size = New System.Drawing.Size(162, 20) Me.dtgebdat.TabIndex = 10 ' 'dtGueltigab ' Me.dtGueltigab.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtGueltigab.Location = New System.Drawing.Point(342, 251) Me.dtGueltigab.Name = "dtGueltigab" Me.dtGueltigab.Size = New System.Drawing.Size(162, 20) Me.dtGueltigab.TabIndex = 27 ' 'dtgueltigbis ' Me.dtgueltigbis.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtgueltigbis.Location = New System.Drawing.Point(342, 277) Me.dtgueltigbis.Name = "dtgueltigbis" Me.dtgueltigbis.Size = New System.Drawing.Size(162, 20) Me.dtgueltigbis.TabIndex = 28 ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.BackColor = System.Drawing.Color.Transparent Me.Label3.Location = New System.Drawing.Point(3, 225) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(41, 13) Me.Label3.TabIndex = 208 Me.Label3.Text = "Kanton" ' 'cbtxtboxKanton ' Me.cbtxtboxKanton.FormattingEnabled = True Me.cbtxtboxKanton.Items.AddRange(New Object() {"AG", "AR", "AI", "BL", "BS", "BE", "FR", "GE", "GL", "GR", "JU", "LU", "NE", "NW", "OW", "SG", "SH", "SZ", "SO", "TG", "TI", "UR", "VD", "VS", "ZG", "ZH"}) Me.cbtxtboxKanton.Location = New System.Drawing.Point(74, 221) Me.cbtxtboxKanton.Name = "cbtxtboxKanton" Me.cbtxtboxKanton.Size = New System.Drawing.Size(162, 21) Me.cbtxtboxKanton.TabIndex = 9 ' 'lblGLN ' Me.lblGLN.AutoSize = True Me.lblGLN.BackColor = System.Drawing.Color.Transparent Me.lblGLN.Location = New System.Drawing.Point(272, 174) Me.lblGLN.Name = "lblGLN" Me.lblGLN.Size = New System.Drawing.Size(56, 13) Me.lblGLN.TabIndex = 210 Me.lblGLN.Text = "GLN/ZSR" ' 'txtGLN ' Me.txtGLN.Location = New System.Drawing.Point(342, 171) Me.txtGLN.Name = "txtGLN" Me.txtGLN.Size = New System.Drawing.Size(107, 20) Me.txtGLN.TabIndex = 23 ' 'txtZSR ' Me.txtZSR.Location = New System.Drawing.Point(455, 171) Me.txtZSR.Name = "txtZSR" Me.txtZSR.Size = New System.Drawing.Size(49, 20) Me.txtZSR.TabIndex = 24 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.BackColor = System.Drawing.Color.Transparent Me.Label4.Location = New System.Drawing.Point(528, 308) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(101, 13) Me.Label4.TabIndex = 211 Me.Label4.Text = "Mail-Kommunikation" ' 'chkMail_Kommunikation ' Me.chkMail_Kommunikation.AutoSize = True Me.chkMail_Kommunikation.Location = New System.Drawing.Point(706, 308) Me.chkMail_Kommunikation.Name = "chkMail_Kommunikation" Me.chkMail_Kommunikation.Size = New System.Drawing.Size(15, 14) Me.chkMail_Kommunikation.TabIndex = 212 Me.chkMail_Kommunikation.UseVisualStyleBackColor = True ' 'cbboxNRArbeitgeber ' Me.cbboxNRArbeitgeber.Dataselection = Nothing Me.cbboxNRArbeitgeber.Displaymember = Nothing Me.cbboxNRArbeitgeber.Location = New System.Drawing.Point(342, 91) Me.cbboxNRArbeitgeber.Name = "cbboxNRArbeitgeber" Me.cbboxNRArbeitgeber.Size = New System.Drawing.Size(162, 21) Me.cbboxNRArbeitgeber.TabIndex = 20 Me.cbboxNRArbeitgeber.Table = Nothing Me.cbboxNRArbeitgeber.TableAlias = "" Me.cbboxNRArbeitgeber.Valuemember = Nothing ' 'cbboxGeschlecht ' Me.cbboxGeschlecht.Dataselection = Nothing Me.cbboxGeschlecht.Displaymember = Nothing Me.cbboxGeschlecht.Location = New System.Drawing.Point(74, 405) Me.cbboxGeschlecht.Name = "cbboxGeschlecht" Me.cbboxGeschlecht.Size = New System.Drawing.Size(162, 21) Me.cbboxGeschlecht.TabIndex = 16 Me.cbboxGeschlecht.Table = Nothing Me.cbboxGeschlecht.TableAlias = "" Me.cbboxGeschlecht.Valuemember = Nothing ' 'cbboxSprache ' Me.cbboxSprache.Dataselection = Nothing Me.cbboxSprache.Displaymember = Nothing Me.cbboxSprache.Location = New System.Drawing.Point(342, 65) Me.cbboxSprache.Name = "cbboxSprache" Me.cbboxSprache.Size = New System.Drawing.Size(162, 21) Me.cbboxSprache.TabIndex = 19 Me.cbboxSprache.Table = Nothing Me.cbboxSprache.TableAlias = "" Me.cbboxSprache.Valuemember = Nothing ' 'cbboxStatus ' Me.cbboxStatus.Dataselection = Nothing Me.cbboxStatus.Displaymember = Nothing Me.cbboxStatus.Location = New System.Drawing.Point(342, 38) Me.cbboxStatus.Name = "cbboxStatus" Me.cbboxStatus.Size = New System.Drawing.Size(162, 21) Me.cbboxStatus.TabIndex = 18 Me.cbboxStatus.Table = Nothing Me.cbboxStatus.TableAlias = "" Me.cbboxStatus.Valuemember = Nothing ' 'cbboxNRTitel ' Me.cbboxNRTitel.Dataselection = Nothing Me.cbboxNRTitel.Displaymember = Nothing Me.cbboxNRTitel.Location = New System.Drawing.Point(74, 65) Me.cbboxNRTitel.Name = "cbboxNRTitel" Me.cbboxNRTitel.Size = New System.Drawing.Size(162, 21) Me.cbboxNRTitel.TabIndex = 2 Me.cbboxNRTitel.Table = Nothing Me.cbboxNRTitel.TableAlias = "" Me.cbboxNRTitel.Valuemember = Nothing ' 'cbboxNrAnrede ' Me.cbboxNrAnrede.Dataselection = Nothing Me.cbboxNrAnrede.Displaymember = Nothing Me.cbboxNrAnrede.Location = New System.Drawing.Point(74, 38) Me.cbboxNrAnrede.Name = "cbboxNrAnrede" Me.cbboxNrAnrede.Size = New System.Drawing.Size(162, 21) Me.cbboxNrAnrede.TabIndex = 1 Me.cbboxNrAnrede.Table = Nothing Me.cbboxNrAnrede.TableAlias = "" Me.cbboxNrAnrede.Valuemember = Nothing ' 'PatientDetails ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.chkMail_Kommunikation) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.txtZSR) Me.Controls.Add(Me.txtGLN) Me.Controls.Add(Me.lblGLN) Me.Controls.Add(Me.cbtxtboxKanton) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.cbboxNRArbeitgeber) Me.Controls.Add(Me.cbboxGeschlecht) Me.Controls.Add(Me.cbboxSprache) Me.Controls.Add(Me.cbboxStatus) Me.Controls.Add(Me.cbboxNRTitel) Me.Controls.Add(Me.cbboxNrAnrede) Me.Controls.Add(Me.dtgueltigbis) Me.Controls.Add(Me.dtGueltigab) Me.Controls.Add(Me.dtgebdat) Me.Controls.Add(Me.txtMutierer) Me.Controls.Add(Me.txtMutiert_am) Me.Controls.Add(Me.txtErstellt_am) Me.Controls.Add(Me.Label18) Me.Controls.Add(Me.Label17) Me.Controls.Add(Me.Label16) Me.Controls.Add(Me.Label15) Me.Controls.Add(Me.Label14) Me.Controls.Add(Me.Label13) Me.Controls.Add(Me.chklbAdresstyp) Me.Controls.Add(Me.txtBemerkung) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.txtFaxG) Me.Controls.Add(Me.txtName) Me.Controls.Add(Me.lbltelg) Me.Controls.Add(Me.lblName) Me.Controls.Add(Me.txtTelg) Me.Controls.Add(Me.txtVorname) Me.Controls.Add(Me.lblahv) Me.Controls.Add(Me.txtahvnr) Me.Controls.Add(Me.lblVorname) Me.Controls.Add(Me.lblBeruf) Me.Controls.Add(Me.txtBeruf) Me.Controls.Add(Me.txtCOAdresse) Me.Controls.Add(Me.lblArbeitgeber) Me.Controls.Add(Me.lblCO) Me.Controls.Add(Me.txtStrasse) Me.Controls.Add(Me.lblSprache) Me.Controls.Add(Me.lblStrasse) Me.Controls.Add(Me.txtPLZ) Me.Controls.Add(Me.lblStatus) Me.Controls.Add(Me.lblPLZOrt) Me.Controls.Add(Me.lblBriefanrede) Me.Controls.Add(Me.txtOrt) Me.Controls.Add(Me.txtBriefanrede) Me.Controls.Add(Me.lblGebDat) Me.Controls.Add(Me.lblGeschlecht) Me.Controls.Add(Me.txttelp) Me.Controls.Add(Me.lblInternet) Me.Controls.Add(Me.lblTelefon) Me.Controls.Add(Me.txtWeb) Me.Controls.Add(Me.txtFaxp) Me.Controls.Add(Me.lblemail) Me.Controls.Add(Me.lblFaxP) Me.Controls.Add(Me.txtE_Mail) Me.Controls.Add(Me.txtNatel) Me.Controls.Add(Me.lblMobile) Me.Controls.Add(Me.txtnrprivat) Me.Controls.Add(Me.lblNr) Me.Controls.Add(Me.lblAnrede) Me.Controls.Add(Me.lblTitel) Me.Name = "PatientDetails" Me.Size = New System.Drawing.Size(737, 461) Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents txtnrprivat As System.Windows.Forms.TextBox Friend WithEvents lblNr As System.Windows.Forms.Label Friend WithEvents lblAnrede As System.Windows.Forms.Label Friend WithEvents lblTitel As System.Windows.Forms.Label Friend WithEvents txtMutierer As System.Windows.Forms.TextBox Friend WithEvents txtMutiert_am As System.Windows.Forms.TextBox Friend WithEvents txtErstellt_am As System.Windows.Forms.TextBox Friend WithEvents Label18 As System.Windows.Forms.Label Friend WithEvents Label17 As System.Windows.Forms.Label Friend WithEvents Label16 As System.Windows.Forms.Label Friend WithEvents Label15 As System.Windows.Forms.Label Friend WithEvents Label14 As System.Windows.Forms.Label Friend WithEvents Label13 As System.Windows.Forms.Label Friend WithEvents chklbAdresstyp As System.Windows.Forms.CheckedListBox Friend WithEvents txtBemerkung As System.Windows.Forms.TextBox Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents txtFaxG As System.Windows.Forms.TextBox Friend WithEvents txtName As System.Windows.Forms.TextBox Friend WithEvents lbltelg As System.Windows.Forms.Label Friend WithEvents lblName As System.Windows.Forms.Label Friend WithEvents txtTelg As System.Windows.Forms.TextBox Friend WithEvents txtVorname As System.Windows.Forms.TextBox Friend WithEvents lblahv As System.Windows.Forms.Label Friend WithEvents txtahvnr As System.Windows.Forms.TextBox Friend WithEvents lblVorname As System.Windows.Forms.Label Friend WithEvents lblBeruf As System.Windows.Forms.Label Friend WithEvents txtBeruf As System.Windows.Forms.TextBox Friend WithEvents txtCOAdresse As System.Windows.Forms.TextBox Friend WithEvents lblArbeitgeber As System.Windows.Forms.Label Friend WithEvents lblCO As System.Windows.Forms.Label Friend WithEvents txtStrasse As System.Windows.Forms.TextBox Friend WithEvents lblSprache As System.Windows.Forms.Label Friend WithEvents lblStrasse As System.Windows.Forms.Label Friend WithEvents txtPLZ As System.Windows.Forms.TextBox Friend WithEvents lblStatus As System.Windows.Forms.Label Friend WithEvents lblPLZOrt As System.Windows.Forms.Label Friend WithEvents lblBriefanrede As System.Windows.Forms.Label Friend WithEvents txtOrt As System.Windows.Forms.TextBox Friend WithEvents txtBriefanrede As System.Windows.Forms.TextBox Friend WithEvents lblGebDat As System.Windows.Forms.Label Friend WithEvents lblGeschlecht As System.Windows.Forms.Label Friend WithEvents txttelp As System.Windows.Forms.TextBox Friend WithEvents lblInternet As System.Windows.Forms.Label Friend WithEvents lblTelefon As System.Windows.Forms.Label Friend WithEvents txtWeb As System.Windows.Forms.TextBox Friend WithEvents txtFaxp As System.Windows.Forms.TextBox Friend WithEvents lblemail As System.Windows.Forms.Label Friend WithEvents lblFaxP As System.Windows.Forms.Label Friend WithEvents txtE_Mail As System.Windows.Forms.TextBox Friend WithEvents txtNatel As System.Windows.Forms.TextBox Friend WithEvents lblMobile As System.Windows.Forms.Label Friend WithEvents dtgebdat As System.Windows.Forms.DateTimePicker Friend WithEvents dtGueltigab As System.Windows.Forms.DateTimePicker Friend WithEvents dtgueltigbis As System.Windows.Forms.DateTimePicker Friend WithEvents cbboxNrAnrede As DPM2016.MyCombobox Friend WithEvents cbboxNRTitel As DPM2016.MyCombobox Friend WithEvents cbboxStatus As DPM2016.MyCombobox Friend WithEvents cbboxSprache As DPM2016.MyCombobox Friend WithEvents cbboxGeschlecht As DPM2016.MyCombobox Friend WithEvents cbboxNRArbeitgeber As DPM2016.MyCombobox Friend WithEvents Label3 As Label Friend WithEvents cbtxtboxKanton As ComboBox Friend WithEvents lblGLN As Label Friend WithEvents txtGLN As TextBox Friend WithEvents txtZSR As TextBox Friend WithEvents Label4 As Label Friend WithEvents chkMail_Kommunikation As CheckBox End Class