Foxtable(狐表)用户栏目专家坐堂 → 怎么用代码删除照片,图片控件增加的多个照片


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

主题:怎么用代码删除照片,图片控件增加的多个照片

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


加好友 发短信
等级:七尾狐 帖子:1750 积分:16485 威望:0 精华:0 注册:2017/6/1 23:12:00
怎么用代码删除照片,图片控件增加的多个照片  发帖心情 Post By:2022/5/31 22:15:00 [只看该作者]

怎么用代码删除照片,图片控件增加的多个照片

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


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/31 22:23:00 [只看该作者]


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


加好友 发短信
等级:七尾狐 帖子:1750 积分:16485 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2022/5/31 22:24:00 [只看该作者]

主要是取完整文件名的代码不会写

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


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/31 22:25:00 [只看该作者]

请举例说明

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


加好友 发短信
等级:七尾狐 帖子:1750 积分:16485 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2022/5/31 22:29:00 [只看该作者]

PictureViewer1这个控件增加的多个图片,删除这行时,想把先把加载到目录里的图片先删除了

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


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/31 22:33:00 [只看该作者]

信息太少,请举例具体数据说明

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


加好友 发短信
等级:七尾狐 帖子:1750 积分:16485 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2022/5/31 22:53:00 [只看该作者]

PictureViewer1这个控件,怎么把多个图片的路径存到另一个字段里,

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


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/31 22:55:00 [只看该作者]


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


加好友 发短信
等级:七尾狐 帖子:1750 积分:16485 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2022/6/1 11:46:00 [只看该作者]

tables("A").Current.DataRow.Lines("文件")

怎么取出其中的单个元素?

 


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


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/1 11:52:00 [只看该作者]

Dim lst As New List(of String)
lst = 
Tables("A").Current.DataRow.Lines("文件")
msgbox(lst(0))


 回到顶部