Foxtable(狐表)用户栏目专家坐堂 → PictureBox是否可能以直接显示文件夹下指定名称的图片


  共有6787人关注过本帖树形打印复制链接

主题:PictureBox是否可能以直接显示文件夹下指定名称的图片

帅哥哟,离线,有人找我吗?
ztmdnzc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4167 威望:0 精华:0 注册:2013/1/18 13:34:00
  发帖心情 Post By:2013/6/14 11:05:00 [显示全部帖子]

以下是引用blackzhu在2012-6-7 8:03:00的发言:
 Dim txt AS WinForm.TextBox 

Dim pbx AS WinForm.PictureBox
pbx = Forms(
"窗口1").Controls("PictureBox1")

txt = Forms("窗口1").Controls("TextBox1")
pbx.Image = GetImage(
"C:\" & txt.Value & ".bmp"
)

 

 试试这样!

pbx.Image = GetImage("d:\Photo\" & txt.Value & ".bmp")

pbx.Image = GetImage("d:\Photo\" & txt.Value & ".jpg")

......

根据常用的图片文件后缀名设置一个判断,用if,或sleect等。

[此贴子已经被作者于2013-6-14 11:07:34编辑过]

 回到顶部