Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口PictureBox控件获取相对路径的图片问题


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

主题:[求助]窗口PictureBox控件获取相对路径的图片问题

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


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
[求助]窗口PictureBox控件获取相对路径的图片问题  发帖心情 Post By:2019/2/5 19:12:00 [只看该作者]

我的一个窗口里有120个PictureBox控件,用于依次显示表A的图片列B的图片,以前在图片列B输入绝对路径或者直接将图片放入Images文件夹时,用下面的代码就能在120个PictureBox控件依次显示图片,现在录入的图片列B图片改为相对路径放在了Attachments下,下面的代码就不起作用了,哪位老师给看看应该怎样修改,相对路径的图片在表里能正常显示,就是窗口控件里不能正常显示,另外祝大家春节快乐!

For i As Integer = 0 To 119 
     If  Tables("随身物品栏").rows.count =0  Then
        Exit For
    End If 

      If i =Tables("随身物品栏").rows.count Then
        Exit For
    End If 
    
    e.form.controls("PictureBox" & (i+1)).imageFile =Tables("随身物品栏").rows(i)("物品图片") 
    e.form.controls("Label" & (i+1)).Text=Tables("随身物品栏").rows(i)("拥有数量")

Next

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


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
  发帖心情 Post By:2019/2/5 20:57:00 [只看该作者]

For i As Integer = 0 To 119 
     If  Tables("随身物品栏").rows.count =0  Then
        Exit For
    End If 

      If i =Tables("随身物品栏").rows.count Then
        Exit For
    End If 
    
    e.form.controls("PictureBox" & (i+1)).imageFile =projectpath   & "Attachments" & "\" & Tables("随身物品栏").rows(i)("物品图片") 
    e.form.controls("Label" & (i+1)).Text=Tables("随身物品栏").rows(i)("拥有数量")

Next

单身狗,全靠手。代码盲,全靠闯!


加上红色的就行了!~看了大半天帮助文件终于解决了!

[此贴子已经被作者于2019/2/5 20:57:44编辑过]

 回到顶部