Foxtable(狐表)用户栏目专家坐堂 → 利用逻辑列的值来判断显示图


  共有4389人关注过本帖平板打印复制链接

主题:利用逻辑列的值来判断显示图

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


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
利用逻辑列的值来判断显示图  发帖心情 Post By:2014/3/3 16:59:00 [只看该作者]

DataTables("收发文基础信息").AddUserStyle("a", Color.LightSteelBlue, Color.Black)
Dim pc3 As WinForm.PictureBox = Forms("系统主窗体").Controls("PictureBox3")
Dim pc2 As WinForm.PictureBox = Forms("系统主窗体").Controls("PictureBox2")
If e.Row("是否处理") = True Then
    e.Style = "a"
    pc3.Image = getimage (projectpath & "images\已处理.jpg")
    pc2.Image = getimage (projectpath & "images\已处理.jpg")
End If

If e.Row("是否处理") = False Then
    pc3.Image = getimage (projectpath & "images\未处理.jpg")
    pc2.Image = getimage (projectpath & "images\未处理.jpg")
End If
 
这个代码有没有更加优化一点的 便于提高效率,要求不是点单元格后就绘制,而是要求点击某行之后再进行绘制,比如双击某行!

 回到顶部
总数 12 1 2 下一页