windowsvistafan
Cadet 3rd Year
- Registriert
- Okt. 2007
- Beiträge
- 37
Tach,
ich wollte mir jetzt selber mal aus ein paar PictureBoxen eine Art TabControl machen.. Am Ende soll es dann so aussehen wie oben beim Office 207 Design.
Ich habe jetzt schonmal folgenden Code für die MouseOvers....
Soweit so gut...
Jetzt mein Problem:
Wie schaff ich es, dass die vier PictureBoxen gemeinsam "arbeiten" und sie zusammen wie ein TabControl funktionieren? Also ich meins so:
Beim Start ist die erste PictureBox ausgewählt (Pressed). Wenn man über sie mit der Maus geht (MouseEnter) erscheint ein "PressedMouseEnter" Bild. Wenn man über die anderen 3 geht (MouseEnter) erscheint ein normales "MouseOver" Bild. Wenn man jetzt auf eine andere PictureBox als die erste klickt (z.B PictureBox 2) soll bei der ersten das "Normale Button"-Bild erscheinen, bei der PictureBox2 soll dann das "Pressed Bild" erscheinen. Wenn man dann über die PictureBox2 geht (MouseEnter) kommt wieder das "PressedMouseEnter"-Bild... Wenn man auf die PictureBox 3 klickt, kommt bei ihr das Pressed, bei den anderen ist es weg, und so weiter....
Hoffe jemand kann mir helfen
Danke !
ich wollte mir jetzt selber mal aus ein paar PictureBoxen eine Art TabControl machen.. Am Ende soll es dann so aussehen wie oben beim Office 207 Design.
Ich habe jetzt schonmal folgenden Code für die MouseOvers....
Code:
Private Sub PictureBox1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseEnter
PictureBox1.Image = My.Resources.PressedMouseOver ' Die PictureBox1 ist beim Starten immer ausgewählt (Pressed)
End Sub
Private Sub PictureBox1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseLeave
PictureBox1.Image = My.Resources.PressedNormal
End Sub
Private Sub PictureBox2_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox2.MouseEnter
PictureBox2.Image = My.Resources.MouseOver
End Sub
Private Sub PictureBox2_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox2.MouseLeave
PictureBox2.Image = My.Resources.Normal
End Sub
Private Sub PictureBox3_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox3.MouseEnter
PictureBox3.Image = My.Resources.MouseOver
End Sub
Private Sub PictureBox3_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox3.MouseLeave
PictureBox3.Image = My.Resources.Normal
End Sub
Private Sub PictureBox4_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox4.MouseEnter
PictureBox4.Image = My.Resources.MouseOver
End Sub
Private Sub PictureBox4_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox4.MouseLeave
PictureBox4.Image = My.Resources.Normal
End Sub
Soweit so gut...
Jetzt mein Problem:
Wie schaff ich es, dass die vier PictureBoxen gemeinsam "arbeiten" und sie zusammen wie ein TabControl funktionieren? Also ich meins so:
Beim Start ist die erste PictureBox ausgewählt (Pressed). Wenn man über sie mit der Maus geht (MouseEnter) erscheint ein "PressedMouseEnter" Bild. Wenn man über die anderen 3 geht (MouseEnter) erscheint ein normales "MouseOver" Bild. Wenn man jetzt auf eine andere PictureBox als die erste klickt (z.B PictureBox 2) soll bei der ersten das "Normale Button"-Bild erscheinen, bei der PictureBox2 soll dann das "Pressed Bild" erscheinen. Wenn man dann über die PictureBox2 geht (MouseEnter) kommt wieder das "PressedMouseEnter"-Bild... Wenn man auf die PictureBox 3 klickt, kommt bei ihr das Pressed, bei den anderen ist es weg, und so weiter....
Hoffe jemand kann mir helfen
Danke !