- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助 单元格的STYLE 设置 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=112731)
-- 发布时间：2018/1/2 9:41:00
-- 求助 单元格的STYLE 设置
在产品名称的combobox 的VALUECHANGED 的事件作判断 如果输入的产品在数据更改统计表中有记录并且修改状态不是“已经完成”，弹出对话框 ，现在我想要在当前表产品列与编号列 作STYLE 样式 （红色）表示
，在下面代码中如何增加
Dim cz As WinForm.ComboBox = e.sender
Dim nm As String =cz.text
Dim dr As DataRow
dr = DataTables("数据更改统计表").Find("产品名称 =\'" & nm & "\'","接收时间 desc",0) \'找出最后更改的记录
If dr IsNot Nothing Then \'如果找到的话
If dr("修改状态")<>"修改完成" Then
MessageBox.show("请确认模具是否已经调整,内容如下" & Chr(13) & Chr(10) & "通知时间:" & dr("接收时间") & Chr(13) & Chr(10) & dr("备注说明"),"产品更改提醒",MessageBoxButtons.OKCancel)
End If
End If
[此贴子已经被作者于2018/1/2 9:42:13编辑过]
-- 发布时间：2018/1/2 9:43:00
--
图片已经上传怎么无法显示图片呢
-- 发布时间：2018/1/2 11:05:00
--
方法一：加一个辅助字段，给辅助字段赋值；在drawcell事件判断辅助字段的值，显示不同样式；
方法二：直接在drawcell事件，写代码find，如果找到匹配数据，就显示不同样式。
http://www.foxtable.com/webhelp/scr/0656.htm
-- 发布时间：2018/1/2 13:07:00
--
比如我想通过对表A 的第3列 判断，如果成立 那么表A 的第1列 第2列 采用样式1 这种代码是如何写，我看了帮助 都是对判断列的单元进行样式的更改，
-- 发布时间：2018/1/2 14:37:00
--
drawcell事件
If e.col.name = "第一列" orelse e.col.name = "第二列" then
If e.row("第三列") = "123" Then
e.style = "样式1"
End If
End If
-- 发布时间：2018/1/2 15:48:00
--
明白了，谢谢
还有一个问题就是打开项目的时候 想让所有表的可见行 只显示最新的20行，这个如何实现， TopVisibleRow 只有Table 表有，datatable 没有这个属性
-- 发布时间：2018/1/2 15:52:00
--
分页加载、动态加载，看看
http://www.foxtable.com/webhelp/scr/1933.htm
-- 发布时间：2018/1/2 16:09:00
--
Dim dr As DataRow
Dim dr2 As DataRow
Dim nm As String=e.Row("产品名称")
If e.Col.name="产品名称" Then
If e.Row.Isnull("产品名称")=False \'已经输入了内容
dr = DataTables("数据更改统计表").Find("产品名称 =\'" & nm & "\'","接收时间 desc",0) \'找出最后更改的记录
If dr IsNot Nothing Then \'如果找到的话
If dr("修改状态")<>"修改完成" Then
e.Style = "红色"
End If
End If
End If
End If
这个代码 写入后没有提供错误与没有反应，不知哪里有问题 请老师再帮忙确认下
-- 发布时间：2018/1/2 16:17:00
--
你设置样式了没有？
你的表格是主表还是窗口表？窗口表要这样设置样式 http://www.foxtable.com/webhelp/scr/2628.htm
不会做，那就做个例子发上来测试。
-- 发布时间：2018/1/3 7:53:00
--
代码是正确的，这个表的样式未设置，以为所有表的样式可以通用的，