Foxtable(狐表)用户栏目专家坐堂 → DrawCell的疑问


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

主题:DrawCell的疑问

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/11 20:44:00 [显示全部帖子]

没看懂,请截图具体表格数据举例说明

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/12 13:54:00 [显示全部帖子]

这是2个表?标颜色的是一个表,然后库存还要到另外一个表查?

然后库存不足的情况下,库存为0的标记为红色,库存>0的标记为绿色?

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/12 14:16:00 [显示全部帖子]

select case e.col.name
case "款号","花色","尺码" '不是门店的列名都放到这里
case else
dim kc as double =  tables("库存").compute("sum(存)","门店='" & e.col.name & "' and 款号='" & e.row("款号") & "'")
if e.row(e.col.name) > kc
if kc > 0 then
e.style = "绿色"
else
e.style = "红色"
end if
end if

end select

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/12 15:13:00 [显示全部帖子]

自己加代码判断一下咯,比如有款号列再执行其它代码

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/12 17:11:00 [显示全部帖子]

在生成表后添加:http://www.foxtable.com/webhelp/topics/1579.htm,比如

Tables("窗口1_table1").fill(..........
DataTables("窗口1_table1").AddUserStyle("样式1"Color.RedColor.White)

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/12/14 8:29:00 [显示全部帖子]

AfterSelChange事件

e.table.Refresh

 回到顶部