Foxtable(狐表)用户栏目专家坐堂 → 请问通过按钮单击事件,设置出表格的标识。


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

主题:请问通过按钮单击事件,设置出表格的标识。

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


加好友 发短信
等级:小狐 帖子:325 积分:2752 威望:0 精华:0 注册:2015/2/3 19:48:00
请问通过按钮单击事件,设置出表格的标识。  发帖心情 Post By:2018/12/19 20:28:00 [显示全部帖子]

1、我想通过一个按钮单击事件, 设置qlquery类型的table中某一列满足条件的单元格的backcolor。  比如 数量 =0 的设置红色。
   我看帮助上只是有在DrawCell事件里的写法。
2、想要引用sqlquery类型的table,因为是在事件里用代码生成的。 想要获取table和datatable的属性只能用这种方法吗?
     Dim tb1 As WinForm.Table = Forms("窗口1").Controls("Table1")
     tb1.table     ....
     tb1.table.datatable    ....


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


加好友 发短信
等级:小狐 帖子:325 积分:2752 威望:0 精华:0 注册:2015/2/3 19:48:00
  发帖心情 Post By:2018/12/19 21:09:00 [显示全部帖子]

   老师那个例子我自己看过了。  我想实现这个功能: 点一下按钮, 
    qlquery类型的table中的“标准成本” 这一列 =0 的变成红色。    再点一下按钮后恢复正常。

      我想应该在按钮的clilk事件里写东西:

    按您给的链接上的写法:

   Dim tb1 As WinForm.Table = Forms("类型1").Controls("Table1")
   tb1.Table.DataTable.AddUserStyle("a" ,Color.Red, Color.White)

   后面我就不知道怎么弄了。
   例子上因为在table控件上的事件,可以直接用e参数
   If e.Col.Name = "数量" Then
   
   我只能这样写:
   if   tb1.table.cols  ...       没法用col属性 




  
   又试了下这样写:
  For Each r As Row In Tables("类型1_Table1").Rows
    If r("标准成本") = 0 Then
        --这里应该设置单元格颜色了,不知道怎么写
    End If    
Next
      

也是不对,求助老师

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


加好友 发短信
等级:小狐 帖子:325 积分:2752 威望:0 精华:0 注册:2015/2/3 19:48:00
  发帖心情 Post By:2018/12/19 22:07:00 [显示全部帖子]

  顶一下

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


加好友 发短信
等级:小狐 帖子:325 积分:2752 威望:0 精华:0 注册:2015/2/3 19:48:00
  发帖心情 Post By:2018/12/19 22:39:00 [显示全部帖子]

  多谢了老师

 回到顶部