- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 这么自动充填字符的表达式，如何写，烦请狐哥帮手 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=13292)
-- 发布时间：2011/10/7 18:10:00
-- 这么自动充填字符的表达式，如何写，烦请狐哥帮手
具体要求如图中的说明。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表达式之四.table |
-- 发布时间：2011/10/7 19:25:00
--
-- 发布时间：2011/10/8 8:43:00
--
谢谢，
但好像不行，
因为”“累计核销费用”和“待报费用”是通过表达式自动计算出来的数据，对“项目状态”更新没有用呢？烦请师兄帮手解决一下，
再次感谢。
-- 发布时间：2011/10/8 9:03:00
--
Select e.DataCol.name
Case "核销费用01","核销费用02","申请费用","累计核销费用"
If e.DataRow.IsNull("待报费用") Then
e.DataRow("项目状态") = "等待资料中"
ElseIf e.DataRow("待报费用") = 0 Then
e.DataRow("项目状态") = "核销完成"
Else
e.DataRow("项目状态") = "正在核销中"
End If
End Select
If e.DataCol.Name = "项目状态" Then
If e.DataRow("项目状态") = "核销完成" Then
e.DataRow.Locked = True
Dim n As Integer = Tables("表A").Findrow(e.DataRow)+1
Tables("表A").SetHeaderCellBackColor("项目状态",Color.Red,n)
End If
End If
-- 发布时间：2011/10/8 15:31:00
--
谢谢，狐哥，
顺便汇报一下工作进展。
购得软件很久，但一直没空研究，近日利用假期，做好了结构，测试了一下，相当不错，呵呵，
近几日准备让同事在测试几次，
打算下月起，开始录入数据。
估计还是要买套开发版才行。
-- 发布时间：2011/10/8 16:16:00
--
KAO,别再叫 狐哥,改叫 狐兄 吧.
总以为在叫我.哈哈
-- 发布时间：2011/10/8 16:19:00
--
哈，人家和老六称兄道弟你也剥夺啊
-- 发布时间：2011/10/8 16:22:00
--
哈，人家和老六称兄道弟你也剥夺啊