以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  PictureBox控件问题,请教老师  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=33632)

--  作者:mamuaiqing
--  发布时间:2013/5/22 4:10:00
--  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控件中的图片文件,代码要怎么写?


--  作者:Bin
--  发布时间:2013/5/22 8:23:00
--  
Dim Proc As New Process
Proc.File = "F:\\管理项目13\\Attachments\\"& r("图片")
Proc.Start()