_ Partial Class usrcntlAdresse 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() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAdresse)) Me.btnSearch = New System.Windows.Forms.Button() Me.lblNotFound = New System.Windows.Forms.Label() Me.lblOld = New System.Windows.Forms.LinkLabel() Me.lblChange = New System.Windows.Forms.LinkLabel() Me.pic = New System.Windows.Forms.PictureBox() Me.Label8 = New System.Windows.Forms.Label() Me.txtAnpsr = New System.Windows.Forms.TextBox() Me.txtStrnr = New System.Windows.Forms.TextBox() Me.txtOrt = New System.Windows.Forms.TextBox() Me.Label36 = New System.Windows.Forms.Label() Me.txtPlz = New System.Windows.Forms.TextBox() Me.Label37 = New System.Windows.Forms.Label() Me.txtStr = New System.Windows.Forms.TextBox() Me.lblBeteiligterBez = New System.Windows.Forms.Label() Me.txtFirma = New System.Windows.Forms.TextBox() Me.cboLand = New System.Windows.Forms.ComboBox() Me.Label1 = New System.Windows.Forms.Label() Me.kdFirma = New VERAG_PROG_ALLGEMEIN.KdSearchBox() CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'btnSearch ' Me.btnSearch.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnSearch.Image = CType(resources.GetObject("btnSearch.Image"), System.Drawing.Image) Me.btnSearch.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnSearch.Location = New System.Drawing.Point(404, 14) Me.btnSearch.Name = "btnSearch" Me.btnSearch.Size = New System.Drawing.Size(72, 39) Me.btnSearch.TabIndex = 469 Me.btnSearch.Text = "Suche" Me.btnSearch.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnSearch.UseVisualStyleBackColor = True ' 'lblNotFound ' Me.lblNotFound.AutoSize = True Me.lblNotFound.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) Me.lblNotFound.ForeColor = System.Drawing.Color.Red Me.lblNotFound.Location = New System.Drawing.Point(336, 0) Me.lblNotFound.Name = "lblNotFound" Me.lblNotFound.Size = New System.Drawing.Size(140, 13) Me.lblNotFound.TabIndex = 467 Me.lblNotFound.Text = "Verknüpfung nicht gefunden" Me.lblNotFound.Visible = False ' 'lblOld ' Me.lblOld.AutoSize = True Me.lblOld.Location = New System.Drawing.Point(321, 113) Me.lblOld.Name = "lblOld" Me.lblOld.Size = New System.Drawing.Size(157, 13) Me.lblOld.TabIndex = 481 Me.lblOld.TabStop = True Me.lblOld.Text = "Daten nicht aktuell! Neu laden?" Me.lblOld.Visible = False ' 'lblChange ' Me.lblChange.AutoSize = True Me.lblChange.Location = New System.Drawing.Point(104, 113) Me.lblChange.Name = "lblChange" Me.lblChange.Size = New System.Drawing.Size(200, 13) Me.lblChange.TabIndex = 480 Me.lblChange.TabStop = True Me.lblChange.Text = "Änderungen in Stammdaten übernehmen" Me.lblChange.Visible = False ' 'pic ' Me.pic.BackgroundImage = CType(resources.GetObject("pic.BackgroundImage"), System.Drawing.Image) Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.pic.InitialImage = CType(resources.GetObject("pic.InitialImage"), System.Drawing.Image) Me.pic.Location = New System.Drawing.Point(94, 33) Me.pic.Name = "pic" Me.pic.Size = New System.Drawing.Size(11, 21) Me.pic.TabIndex = 482 Me.pic.TabStop = False Me.pic.Visible = False ' 'Label8 ' Me.Label8.AutoSize = True Me.Label8.Location = New System.Drawing.Point(3, 55) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(88, 13) Me.Label8.TabIndex = 471 Me.Label8.Text = "Ansprechpartner:" ' 'txtAnpsr ' Me.txtAnpsr.Location = New System.Drawing.Point(107, 52) Me.txtAnpsr.Name = "txtAnpsr" Me.txtAnpsr.Size = New System.Drawing.Size(369, 20) Me.txtAnpsr.TabIndex = 472 ' 'txtStrnr ' Me.txtStrnr.Location = New System.Drawing.Point(346, 71) Me.txtStrnr.Name = "txtStrnr" Me.txtStrnr.Size = New System.Drawing.Size(130, 20) Me.txtStrnr.TabIndex = 475 ' 'txtOrt ' Me.txtOrt.Location = New System.Drawing.Point(212, 90) Me.txtOrt.Name = "txtOrt" Me.txtOrt.Size = New System.Drawing.Size(264, 20) Me.txtOrt.TabIndex = 479 ' 'Label36 ' Me.Label36.AutoSize = True Me.Label36.Location = New System.Drawing.Point(3, 92) Me.Label36.Name = "Label36" Me.Label36.Size = New System.Drawing.Size(90, 13) Me.Label36.TabIndex = 476 Me.Label36.Text = "Land / PLZ / Ort:" ' 'txtPlz ' Me.txtPlz.Location = New System.Drawing.Point(158, 90) Me.txtPlz.Name = "txtPlz" Me.txtPlz.Size = New System.Drawing.Size(55, 20) Me.txtPlz.TabIndex = 478 ' 'Label37 ' Me.Label37.AutoSize = True Me.Label37.Location = New System.Drawing.Point(3, 73) Me.Label37.Name = "Label37" Me.Label37.Size = New System.Drawing.Size(63, 13) Me.Label37.TabIndex = 473 Me.Label37.Text = "Straße / Nr:" ' 'txtStr ' Me.txtStr.Location = New System.Drawing.Point(107, 71) Me.txtStr.Name = "txtStr" Me.txtStr.Size = New System.Drawing.Size(240, 20) Me.txtStr.TabIndex = 474 ' 'lblBeteiligterBez ' Me.lblBeteiligterBez.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblBeteiligterBez.Location = New System.Drawing.Point(3, 16) Me.lblBeteiligterBez.Name = "lblBeteiligterBez" Me.lblBeteiligterBez.Size = New System.Drawing.Size(90, 33) Me.lblBeteiligterBez.TabIndex = 468 Me.lblBeteiligterBez.Text = "NAME:" Me.lblBeteiligterBez.TextAlign = System.Drawing.ContentAlignment.BottomLeft ' 'txtFirma ' Me.txtFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtFirma.Location = New System.Drawing.Point(107, 33) Me.txtFirma.Name = "txtFirma" Me.txtFirma.Size = New System.Drawing.Size(298, 20) Me.txtFirma.TabIndex = 470 ' 'cboLand ' Me.cboLand.FormattingEnabled = True Me.cboLand.Items.AddRange(New Object() {"AT", "DE", "HR", "IT", "RO", "SRB", "TR"}) Me.cboLand.Location = New System.Drawing.Point(107, 89) Me.cboLand.Name = "cboLand" Me.cboLand.Size = New System.Drawing.Size(52, 21) Me.cboLand.TabIndex = 477 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(231, 17) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(63, 13) Me.Label1.TabIndex = 484 Me.Label1.Text = "VERAG-Kd:" ' 'kdFirma ' Me.kdFirma._AllowSetValue = True Me.kdFirma._autoSizeGross = False Me.kdFirma._display_Name1 = False Me.kdFirma._displayAVISO_Email = False Me.kdFirma._displayFullName = False Me.kdFirma._displayWoelflKd = False Me.kdFirma._hideIfListEmpty = True Me.kdFirma._loadKdData = True Me.kdFirma._ValueKdAndName = True Me.kdFirma.dgvpos = "LEFT" Me.kdFirma.KdName = "" Me.kdFirma.KdNr = "-1" Me.kdFirma.kdNrField = Nothing Me.kdFirma.KdNrNullInt = Nothing Me.kdFirma.Location = New System.Drawing.Point(300, 14) Me.kdFirma.Name = "kdFirma" Me.kdFirma.nurAktive = True Me.kdFirma.searchActive = True Me.kdFirma.Size = New System.Drawing.Size(105, 20) Me.kdFirma.TabIndex = 483 Me.kdFirma.usrcntl = Nothing ' 'usrcntlAdresse ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White Me.Controls.Add(Me.btnSearch) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.kdFirma) Me.Controls.Add(Me.lblNotFound) Me.Controls.Add(Me.lblOld) Me.Controls.Add(Me.lblChange) Me.Controls.Add(Me.pic) Me.Controls.Add(Me.Label8) Me.Controls.Add(Me.txtAnpsr) Me.Controls.Add(Me.txtStrnr) Me.Controls.Add(Me.txtOrt) Me.Controls.Add(Me.Label36) Me.Controls.Add(Me.txtPlz) Me.Controls.Add(Me.Label37) Me.Controls.Add(Me.txtStr) Me.Controls.Add(Me.lblBeteiligterBez) Me.Controls.Add(Me.txtFirma) Me.Controls.Add(Me.cboLand) Me.Name = "usrcntlAdresse" Me.Size = New System.Drawing.Size(482, 129) CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Public WithEvents btnSearch As System.Windows.Forms.Button Public WithEvents lblNotFound As System.Windows.Forms.Label Public WithEvents lblOld As System.Windows.Forms.LinkLabel Public WithEvents lblChange As System.Windows.Forms.LinkLabel Public WithEvents pic As System.Windows.Forms.PictureBox Public WithEvents Label8 As System.Windows.Forms.Label Public WithEvents txtAnpsr As System.Windows.Forms.TextBox Public WithEvents txtStrnr As System.Windows.Forms.TextBox Public WithEvents txtOrt As System.Windows.Forms.TextBox Public WithEvents Label36 As System.Windows.Forms.Label Public WithEvents txtPlz As System.Windows.Forms.TextBox Public WithEvents Label37 As System.Windows.Forms.Label Public WithEvents txtStr As System.Windows.Forms.TextBox Public WithEvents lblBeteiligterBez As System.Windows.Forms.Label Public WithEvents txtFirma As System.Windows.Forms.TextBox Public WithEvents cboLand As System.Windows.Forms.ComboBox Friend WithEvents kdFirma As VERAG_PROG_ALLGEMEIN.KdSearchBox Public WithEvents Label1 As System.Windows.Forms.Label End Class