以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- PictureBox1图片切换问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143591) |
-- 作者:狐表(小白) -- 发布时间:2019/11/28 22:02:00 -- PictureBox1图片切换问题 请问各位老师:窗口1有2个按钮(审核、撤审),想实现点击审核显示图片“已审核”,点击撤审显示图片“未审核”。现在只能显示审核按钮的已审核图片,撤审按钮的未审核图片不显示。但是里面的撤审代码能执行。什么问题?谢谢! 审核chick: Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1") pbx.ImageFile = "E:\\图标\\Images\\已审核.jpg" pbx.SizeMode = ImageSizeMode.StretchImage Tables("表1").Current.Locked = True 撤审chick: Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1") pbx.SizeMode = ImageSizeMode.StretchImage If Tables("表1").Current.Locked = True Then pbx.ImageFile = “” Tables("表1").Current.Locked = False pbx.ImageFile = "E:\\图标\\Images\\未审核.jpg" End If [此贴子已经被作者于2019/11/28 22:17:14编辑过]
|
-- 作者:有点蓝 -- 发布时间:2019/11/29 9:30:00 -- 撤审chick: Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1") pbx.SizeMode = ImageSizeMode.StretchImage pbx.ImageFile = "E:\\图标\\Images\\未审核.jpg" If Tables("表1").Current.Locked = True Then Tables("表1").Current.Locked = False End If |
-- 作者:狐表(小白) -- 发布时间:2019/11/29 11:28:00 -- 谢谢老师,再请教一个问题,窗口控件页面集合的页面可以绑定同一个项目的其它窗口吗? |
-- 作者:有点蓝 -- 发布时间:2019/11/29 12:00:00 -- 可以,看看:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=77912 |