[求助]我在“人力档案”表的PrepareEdit事件中加的这段代码，有问题吗? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我在“人力档案”表的PrepareEdit事件中加的这段代码，一有选择这些列的年月后就会死机，CPU徘徊在50%不下。有问题吗?

Select Case e.Col.name

Case "入职_社保_起交年月", _

"入职_社保_起收年月", _

"入职_公积金_起交年月", _

"入职_公积金_起收年月", _

"离职_社保_停交年月", _

"离职_社保_停收年月", _

"离职_公积金_停交年月", _

"离职_公积金_停收年月"

Dim tb As New DropTreeBuilder

tb.SourceTable = DataTables("年月") '指定目录树表

tb.TreeCols = "年|年月" '指定用于生成目录树的列

tb.SourceCols = "年月" '指定数据来源列

tb.ReceiveCols = e.Col.Name '★指定数据接收列

tb.TreeSort = "_Identify"

e.Col.DropTree = tb.Build()

End Select

主题：[求助]我在“人力档案”表的PrepareEdit事件中加的这段代码，有问题吗?