[求助]通过prepareEdit事件代码生成数据表目录树引起死机的求助 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

那这段代码，写到click事件里去，或者currentTableChanged事件

If e.Col.Name="公司" Then

Dim tb As New DropTreeBuilder

tb.SourceTable = DataTables("原料采购") '指定目录树表

tb.TreeCols = "公司|合同号|牌号" '指定用于生成目录树的列

tb.SourceCols = "合同号|公司|代码|牌号|厚度|宽度|重量|提货方式|合同主号" '指定数据来源列

tb.ReceiveCols = "合同号|公司|代码|牌号|厚度|宽度|重量|提货方式|合同主号" '指定数据接收列

tb.TreeWidth=250

tb.TreeFilter="[审核]=False"

Tables("原料采购入库通知明细").Cols("公司").DropTree = tb.Build()

End If

主题：[求助]通过prepareEdit事件代码生成数据表目录树引起死机的求助