[讨论]CheckedComboBox的过滤条件中能不能用变量 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

一个单选下拉框，一个复选下拉框。要让单选下拉框的内容改变时判断单选下拉框的内容，取内容所对应的代码。将代码赋值给变量a。然后在复选下拉框的过滤条件属性中，添加过滤条件，[代码]=a。这样就会报错，该怎么写代码呢？？

Dim n As Integer = Tables("专业种类字典").Rows.Count

Dim i As Integer = 0

Do While i <= n-1

If e.Form.Controls("zyzl").text = Tables("专业种类字典").Rows(i)("专业种类")

kzdm = Tables("专业种类字典").Rows(i)("代码")

End If

i = i+1

Loop

从专业种类字典中获取到选中内容的代码字段中的值。赋值到public变量kzdm。

这个代码对应n个值。要在复选下拉框中能显示kzdm说对应d值！

[此贴子已经被作者于2015-1-5 16:39:07编辑过]

主题：[讨论]CheckedComboBox的过滤条件中能不能用变量