Foxtable(狐表)用户栏目专家坐堂 → 绘图板加图片


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

主题:绘图板加图片

美女呀,离线,留言给我吧!
漂亮美眉vszh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:893 积分:8064 威望:0 精华:0 注册:2013/5/30 11:27:00
绘图板加图片  发帖心情 Post By:2019/8/27 9:56:00 [显示全部帖子]

老师,这句代码前几天执行正常,这几天执行老报错,查不出哪里有问题。
Dim p As WinForm.Painter = e.Form.Controls("Painter2")
Dim g As Graphics = p.Graphics
g.Clear(Color.LightSkyBlue)
p.Repaint()

If Tables("MainTable").current.Isnull("ProudPic") = False Then
    Dim srr As String = “D:\public\UploadData\FMEA\0000201908-0003\ProudPic\" & Tables("MainTable").current("ProudPic")
    MessageBox.Show(srr)
    g.DrawImage(getImage(srr),48,60,200,200)
    p.Repaint()
End If

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


 回到顶部