动态列表项目不可选（已解决） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

在表的PrepareEdit事件加入如下代码，在“客户全称”列，可以生成动态列表项目，改变选项后，所有的按钮失效。切换表后，按钮恢复功效，加载表后，又恢复到原来的选项。而另外两张表，用同样的代码，运行正常。不知问题可能出在哪里，请各位老师指教，谢谢！！

If e.IsFocusCell Then '如果是焦点所在单元格

If e.Col.Name = "客户全称" Then '如果正在编辑的是客户单位全称列

'从cjml2提取该单位的客户单位全称作为列表项目

e.Col.Combolist = DataTables("cjml2").GetComboListString("客户全称", "[单位] = '" & e.Row("单位") & "'")

End If

[此贴子已经被作者于2012-12-7 10:39:35编辑过]

主题：动态列表项目不可选（已解决）