Hallo Leute,
ich bin ein absoluter neuling und möchte nur etwas kleines ''Programmieren''.
Ich möchte 3 Pictureboxen ( PictureBox 1,2,3) in einer großen Picturebox ( PictureBox 4) bewegen, nur ich möchte halt jede einzelne der 3 Pictureboxen auswählen und dann mit der Maus bewegen können, also es sollen sich nicht alle 3 gleichzeitig bewegen.
Hoffe ihr könnt mir weiter helfen hab schon gestern Abend den gazen Tag in eurem Forum versucht nach einer Lösung zu finden wurde aber leider nicht fündig.
Hier ist der bisher geschriebene Code ( Ich benutze VB Express 2010 ) :
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Private Sub PictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
Friend WithEvents PictureBox4 As System.Windows.Forms.PictureBox
Private Sub PictureBox4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub LineShape4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Friend WithEvents ShapeContainer1 As Microsoft.VisualBasic.PowerPacks.ShapeContainer
Friend WithEvents RectangleShape1 As Microsoft.VisualBasic.PowerPacks.RectangleShape
Private Sub PictureBox1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
End Sub
Private Sub PictureBox1_MouseDown1(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub Form1_Load_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Friend WithEvents Timer1 As System.Windows.Forms.Timer
Public Class Form1
End Class
Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
End Sub
Private Sub PictureBox2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox2.Click
End Sub
Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click
End Sub
End Class
Mit freundlichen Grüßen,
davidtrixx
ich bin ein absoluter neuling und möchte nur etwas kleines ''Programmieren''.
Ich möchte 3 Pictureboxen ( PictureBox 1,2,3) in einer großen Picturebox ( PictureBox 4) bewegen, nur ich möchte halt jede einzelne der 3 Pictureboxen auswählen und dann mit der Maus bewegen können, also es sollen sich nicht alle 3 gleichzeitig bewegen.
Hoffe ihr könnt mir weiter helfen hab schon gestern Abend den gazen Tag in eurem Forum versucht nach einer Lösung zu finden wurde aber leider nicht fündig.
Hier ist der bisher geschriebene Code ( Ich benutze VB Express 2010 ) :
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Private Sub PictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
Friend WithEvents PictureBox4 As System.Windows.Forms.PictureBox
Private Sub PictureBox4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub LineShape4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Friend WithEvents ShapeContainer1 As Microsoft.VisualBasic.PowerPacks.ShapeContainer
Friend WithEvents RectangleShape1 As Microsoft.VisualBasic.PowerPacks.RectangleShape
Private Sub PictureBox1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
End Sub
Private Sub PictureBox1_MouseDown1(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub Form1_Load_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Friend WithEvents Timer1 As System.Windows.Forms.Timer
Public Class Form1
End Class
Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
End Sub
Private Sub PictureBox2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox2.Click
End Sub
Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click
End Sub
End Class
Mit freundlichen Grüßen,
davidtrixx
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „davidtrixx“ ()