初始数的科目汇总 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

PrepareEdit事件中的代码我不明，在这写代码意思是如果有下级科目，所有上级科目都不允许手工输入，由代码自动计算，你这样写变成一级科目没取消输入，最后级科不能输入了。

Select Case e.Col.Name

Case "借或贷","初始数量","初始余额"

If e.Row.IsNull("科目代码") = False Then

If e.Table.Compute("count(_Identify)","科目代码 like '" & e.Row("科目代码") & "%' and len(科目代码)=" & e.Row("科目代码").length + 4) > 0

e.Cancel = True

End If

End Select

[此贴子已经被作者于2021/5/21 17:16:52编辑过]

主题：初始数的科目汇总