我在“厂家”表中的窗口的Afterload属性中加入如下代码,执行正常。
e.Form.Controls("ComboBox1").Items.Clear
e.Form.Controls("ComboBox1").Value = Nothing
Dim ls As New List(Of String)
ls = DataTables("厂家").GetUniqueValues("","分类")
e.Form.Controls("ComboBox1").Items.AddRange(ls.ToArray())
Vars("ColName") = "分类"
e.Form.Controls("ComboBox1").Select()
可是我在另一表“项目管理”中加入相似的语句,来对另一“申请单位”控件进行筛选操作:
e.Form.Controls("ComboBox1").Items.Clear
e.Form.Controls("ComboBox1").Value = Nothing
Dim ls As New List(Of String)
ls = DataTables("项目管理").GetUniqueValues("","申请单位")
e.Form.Controls("ComboBox1").Items.AddRange(ls.ToArray())
Vars("ColName") = "申请单位"
e.Form.Controls("ComboBox1").Select()
在打开窗口时,显示出错提示:设置datasorce 属性后,集合无法执行(提示同前楼的附图)
是什么原因,请指出,谢谢了!
以下是引用t_fs在2008-9-26 19:26:00的发言:
在打开窗口时,显示出错提示:设置datasorce 属性后,集合无法执行(提示同前楼的附图)
是什么原因,请指出,谢谢了!
凡是出现这样的提示,只有一个原因,你没有取消绑定!
第一个表窗口中的“分类”,是用于录入数据的,所以绑定字段“分类”了。运行一切正常,也能筛选去掉重复。
第二个表按同样方式加入代码后,绑定或是不绑定,打开第二个表时都出现出错信息。但是并不影响第一表窗口效果。
谢谢回复!
"分类”是窗口中用于录入数据的,所以必须绑定字段“分类”。同时运行也正常。
但第二个表中再用一下,为何就不好使了呢?难道只用在一个控件中为实现这个功能吗?
应该不会只能一个控件这么用的。
做一个例子传上来,让大家帮你看一下,具体说明哪一个位置有问题。