Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button3.Click
 
        Dim Vertex As New PictureBox
 
        With Vertex
            .Name = "Vertex"
            .Width = 13
            .Height = 13
            .BackColor = Color.Transparent
            .Image = My.Resources.Vertex
            .Visible = True
            .Top = PictureBox1.Location.Y + 20
            .Left = PictureBox1.Location.X + 20
        End With
        Me.Controls.Add(Vertex) ' picturebox1 der Form hinzufügen
 
    End Sub