主题：图片位置

 完全搞不懂你想表达什么

If e.Sender.Name.Contains("icon_") Then
    e.Form.Controls(e.sender.name).basecontrol.BackgroundImage = getImage("down03.png")
    e.Form.Controls(e.sender.name).BaseControl.BackgroundImageLayout = ImageLayout.Stretch
    Application.DoEvents
End If

那就是代码没有问题。

直接说你想做什么效果

 测试了一下，代码没问题，你三个大小必须一致。 afterload事件设置一下

e.Form.Controls("pane_down").Left = e.Form.Controls("pane_按钮").left
e.Form.Controls("pane_down").Top = e.Form.Controls("pane_按钮").Top
e.Form.Controls("pane_down").width = e.Form.Controls("pane_按钮").width
e.Form.Controls("pane_down").height = e.Form.Controls("pane_按钮").height

e.Form.Controls("Painter1").Left = e.Form.Controls("pane_按钮").left
e.Form.Controls("Painter1").Top = e.Form.Controls("pane_按钮").Top
e.Form.Controls("Painter1").width = e.Form.Controls("pane_按钮").width
e.Form.Controls("Painter1").height = e.Form.Controls("pane_按钮").height