코드로 추가하는 컨트롤을 어떻게 편집합니까?

Question

내 문제는 사용자가 그림 상자의 이름을 바꾸게합니다. 그래서 내 같은 코드 :

Dim Picturebox As New PictureBox 
    Picturebox.Name = TextBox1.Text 

그리고 사용자가 다른 PictureBox를 추가 할 수 있습니다.

어떻게하면 그림 보관함을 끌 수 있습니까?

저는 PictureBox 드래그를 MouseMove, MouseDown으로 만들 수 있다는 것을 알고 있습니다 만, 어떻게?

이 마음에 드십니까?

Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles "Textbox1.text".MouseDown 

    End Sub 

Answer 1

에 PictureBox는 않는 이름이 필요하지...

당신은 소스 PB를 얻을 수 있도록 핸들러에 이벤트를 묶는 AddHandler에를 사용하고 "보낸 사람"매개 변수를 던져 줄

:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    Dim PB As New PictureBox 
    AddHandler PB.MouseMove, AddressOf PB_MouseMove 
    ' ... more code with "PB" ... 
End Sub 

Private Sub PB_MouseMove(sender As Object, e As MouseEventArgs) 
    Dim PB As PictureBox = DirectCast(sender, PictureBox) 
    If e.Button = Windows.Forms.MouseButtons.Left Then 
     PB.DoDragDrop("some data", DragDropEffects.All) 
    End If 
End Sub