1、
enter 事件 vars("image") = e.Form.Controls("PictureBox1").Image
Scroll 事件 Dim img As Image = vars("image")
2、3、4 自己百度解决