清空图片框内容 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 清空图片框内容

共有3082人关注过本帖树形打印复制链接主题：清空图片框内容

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109635 积分：557861 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/22 17:40:00 [显示全部帖子]

如果绑定的，清除绑定的单元格的内容

Dim pbx AS WinForm.PictureBox
pbx = Forms("窗口1").Controls("PictureBox1")
pbx.Image = nothing

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109635 积分：557861 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/23 20:24:00 [显示全部帖子]

看2楼。测试了吗？写了什么代码？有什么问题？

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109635 积分：557861 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/24 10:12:00 [显示全部帖子]

修改写了什么代码

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109635 积分：557861 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/5/24 10:19:00 [显示全部帖子]

……

Dim semiTransBrush As new System.Drawing.SolidBrush(Color.FromArgb(50, 0, 0, 0)) '水印文字颜色,120是透明度,范围0~255

g.DrawString(txt, fnt, semiTransBrush, new PointF(0,0))

img.Save("c:\sy.jpg")

g.Dispose()

sy.Image = Nothing

sy.Image = img

主题：清空图片框内容