Hi
ich habe Dich schon verstanden. Ich verstehe nur nicht, wieso Dein Code, vom Original-VB.NET-Code abweicht ? (Liegt es daran ?)
Hier Originalcode für TabPages in VB.NET, habe darin 2 Tabs erzeugt, "TabPage" und TabTest":
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
[...][color=green]
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl '
' TAB-CONTROL
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage ' 1. TAB
Friend WithEvents TabTest As System.Windows.Forms.TabPage ' 2. TAB
[/color]
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
[...]
Erzeugen vom Control und Hinzufügen der Tabulatoren
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.TabTest = New System.Windows.Forms.TabPage()
Me.TabControl1.SuspendLayout()
Me.SuspendLayout()
'
[...]
'
'TabControl1: das Control-Objekt an sich...
'
Me.TabControl1.Controls.AddRange(New System.Windows.Forms.Control() _
{Me.TabPage1, Me.TabTest})
[color=red]Beachte nun die obige Zeile: beide Tabulatoren {Me.TabPage1, _
Me.TabTest} werden dem Control hinzugefügt![/color]
Me.TabControl1.Location = New System.Drawing.Point(224, 48)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(80, 64)
Me.TabControl1.TabIndex = 1
'
'TabPage1: erste Tabulatorseite...
'
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Size = New System.Drawing.Size(72, 38)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "TabPage1"
'
'TabTest: zweite Tabulatorseite...
'
Me.TabTest.Location = New System.Drawing.Point(4, 22)
Me.TabTest.Name = "TabTest"
Me.TabTest.Size = New System.Drawing.Size(72, 38)
Me.TabTest.TabIndex = 1
Me.TabTest.Text = "Test"Soweit das VB.NET-Original.
Hier ist Dein Code:
'HINWEIS: Die folgende Prozedur ist für den Komponenten-Designer erforderlich
'Sie kann mit dem Komponenten-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents PB As System.Windows.Forms.PictureBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.PB = New System.Windows.Forms.PictureBox()
Me.SuspendLayout()
'
'PB
'
Me.PB.Anchor = ((System.Windows.Forms.AnchorStyles.Top Or _
System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me.PB.Name = "PB"
Me.PB.Size = New System.Drawing.Size(248, 40)
Me.PB.TabIndex = 0
Me.PB.TabStop = False
'
'GigaTabControl
'
Me.BackColor = System.Drawing.Color.White
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.PB})
[color=red]Beachte nun die obige Zeile: {Me.PB} wird dem Control _
hinzugefügt! Darfst Du einer Tabulatorseite ein PictureBox zuordnen ? _
Ist das Deine Absicht ?[/color]
Me.Name = "GigaTabControl"
Me.Size = New System.Drawing.Size(248, 40)
Me.ResumeLayout(False)Unabhängig davon, generiert VB.NET im Original die folgenden Zeilen:
[color=green]
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl '
' TAB-CONTROL
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage ' 1. TAB
Friend WithEvents TabTest As System.Windows.Forms.TabPage ' 2. TAB
[/color] Diese fehlen in Deinem Code. Somit weiß Dein Code nichts über die Existenz Deiner Objekte (TabPages) oder Du hast noch keine TabPages erzeugt ?
Falls ja, schaue mal, ob sie analog zum ersten Code-Beispiel (grüner Text) in Deinem Code (dem vom Control-Designer erzeugten) vertreten sind.
Weißt Du, was ich meine ? |