主题：PictureBox控件问题,请教老师

在窗口"AfterLoad"事件中写入下面的代码,实现了打开窗口后图片控件中显示的是表中图片列的照片

Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1")
pbx.SizeMode = ImageSizeMode.Zoom
Dim r As Row = Tables("客户产品表").Current
pbx.Image  = GetImage("F:\管理项目13\Attachments\"& r("图片") )

想在窗口中加个"按钮"控件用来打开PictureBox1控件中的图片文件,代码要怎么写?