PositionChanged事件里这样写代码有问题吗？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → PositionChanged事件里这样写代码有问题吗？

共有2954人关注过本帖树形打印复制链接主题：PositionChanged事件里这样写代码有问题吗？

goldenfont

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

等级：小狐帖子：389 积分：3874 威望：0 精华：0 注册：2016/4/25 17:36:00

PositionChanged事件里这样写代码有问题吗？ 发帖心情

Post By：2020/3/23 10:25:00 [显示全部帖子]

数据库中字段存放的是base64字符，然后切换记录时显示对应的图片

'+++++++根据当前记录显示数据库中的图片++++++++++++++++

If e.Table.Cols.Contains("产品编号") Then

Dim cmd As New SQLCommand

cmd.C

cmd.CommandText = "s elect 示意图 from ZL_SKU where SKU编码='" & cur("产品编号") & "'"

If cmd.ExecuteScalar <> "" Then

e.Form.Controls("PictureBox1").Image = Functions.Execute("Base64ToImage",cmd.ExecuteScalar)

Else

e.Form.Controls("PictureBox1").Image = Nothing

End If

第一次加载时会出现“未将对象引用设置到对象的实例。”关掉就好了，这是什么问题？

goldenfont

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

等级：小狐帖子：389 积分：3874 威望：0 精华：0 注册：2016/4/25 17:36:00

Post By：2020/3/23 12:11:00 [显示全部帖子]

不是二进制图片，是base64的字符串

Dim bs As Byte() = Convert.FromBase64String(base64)

Dim stream As System.IO.Stream = New System.IO.MemoryStream(bs)

Return Image.FromStream(stream,False)

主题：PositionChanged事件里这样写代码有问题吗？