| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- PictureBox是否可能以直接显示文件夹下指定名称的图片 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=20382) |
| -- 作者：飞天 -- 发布时间：2012/6/6 21:49:00 -- PictureBox是否可能以直接显示文件夹下指定名称的图片 如题; 在D盘,有一个文件夹名称:"Photo",它他设为共享. 在窗口中,有一个PictureBox1,和一个TextBox1控件 当我在TextBox1中录入一个图片名称时(例如:logo.jpg),PictureBox1就自动从"photo"文件夹下面读取关于这个名称的图片, 请教老师们,如何才能做到? |
| -- 作者：mr725 -- 发布时间：2012/6/6 22:02:00 -- Dim pbx AS WinForm.PictureBoxpbx = Forms("窗口1").Controls("PictureBox1") pbx.Image = GetImage("C:\\Sample.bmp") |
| -- 作者：飞天 -- 发布时间：2012/6/6 23:10:00 -- 你好!如何能根据TextBox1所改变的图片名称而显示不同的图片, |
| -- 作者：mr725 -- 发布时间：2012/6/6 23:21:00 -- 做个例子上来会有人帮您的。
|
| -- 作者：blackzhu -- 发布时间：2012/6/7 8:03:00 -- Dim txt AS WinForm.TextBox Dim pbx AS WinForm.PictureBoxpbx = Forms("窗口1").Controls("PictureBox1") txt = Forms("窗口1").Controls("TextBox1")
试试这样! |
| -- 作者：ztmdnzc -- 发布时间：2013/6/14 11:05:00 -- 以下是引用blackzhu在2012-6-7 8:03:00的发言：
Dim txt AS WinForm.TextBox Dim pbx AS WinForm.PictureBoxpbx = Forms("窗口1").Controls("PictureBox1") txt = Forms("窗口1").Controls("TextBox1")
试试这样! pbx.Image = GetImage("d:\\Photo\\" & txt.Value & ".bmp") pbx.Image = GetImage("d:\\Photo\\" & txt.Value & ".jpg") ...... 根据常用的图片文件后缀名设置一个判断，用if，或sleect等。 [此贴子已经被作者于2013-6-14 11:07:34编辑过]
|