看看
http://www.foxtable.com/help/topics/2127.htm
afterLoad事件写
Dim tb As New DropTreeBuildertb.SourceTable = DataTables("行政区域") '指定目录树表tb.TreeCols = "省|县市" '指定用于生成目录树的列tb.SourceCols = "省|县市|区号|邮编" '指定数据来源列tb.ReceiveCols = "省|县市|区号|邮编" '指定数据接收列
e.Form.Controls("Table1").Table.Cols("省").DropTree = tb.Build()