패널에 20 개의 그림 상자를 동적으로 추가했으며 마우스 휠을 사용할 때 패널 스크롤을보고 싶습니다. 이를 구현하기 위해 패널 컨트롤에서 autoscroll을 true로 설정하려고했습니다. 여기에 코드가 있습니다. 를 들어 내가 정수 = 1 ~ 20 : 그림 상자 컨트롤이 동적으로 추가 된 패널의 마우스 휠 스크롤?
Dim b As New PictureBox()
b.Image = Nothing
b.BorderStyle = BorderStyle.FixedSingle
b.Text = i.ToString()
b.Size = New Size(60, 40)
b.Location = New Point(0, (i * b.Height) - b.Height)
b.Parent = Panel1
Panel1.Controls.Add(b)
Next
내가 단추 컨트롤과 같은 일을했고 그냥 잘 작동합니다. 대한 내가 정수 = 1 내지 100 :
Dim b As New Button()
b.Text = i.ToString()
b.Size = New Size(60, 40)
b.Location = New Point(0, (i * b.Height) - b.Height)
b.Parent = Panel1
Panel1.Controls.Add(b)
Next
그것은 "버튼을"제어를 위해 작동하지만,하지 "PictureBox를"또는 "라벨"컨트롤? '마우스 휠'을 사용하여 스크롤 효과를 구현하려면 어떻게해야합니까?