Foxtable(狐表)用户栏目专家坐堂 → [求助]加载图片时,一个蹊跷的问题


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

主题:[求助]加载图片时,一个蹊跷的问题

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


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
[求助]加载图片时,一个蹊跷的问题  发帖心情 Post By:2014/5/4 11:36:00 [显示全部帖子]

Dim pbx As WinForm.PictureBox
pbx = Forms("运单打印").Controls("PictureBox1")
If G_Site <> "部门A" Then
    MessageBox.show("正在载入图片...")
    pbx.Image = GetImage(ProjectPath & "\Images\部门A.jpg")
Else
    MessageBox.show("正在载入图片...")
    pbx.Image = GetImage(ProjectPath & "\Images\部门B.jpg")
   
End If

 

在AFTERLOAD里面写这个代码,如果添加 MessageBox.show("正在载入图片...") 这句,图片就正确被添加,

如果注释掉,就不能正确添加,请问有没有不用MessageBox.show也能正确添加的方法。


 回到顶部
帅哥哟,离线,有人找我吗?
hiliuyong
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
  发帖心情 Post By:2014/5/4 11:46:00 [显示全部帖子]

这个如何加 我还真的不知道

 回到顶部