以下是引用czy在2009-8-1 20:07:00的发言:
我也学一个
Dim s As String
For Each dc As DataCol In DataTables("表名").DataCols
s = s & "|" & dc.name
e.Form.Controls("ComboBox").ComboList = s
Next
应该这样:
Dim s As String
For Each dc As DataCol In DataTables("表名").DataCols
s = s & "|" & dc.name
Next
e.Form.Controls("ComboBox").ComboList = s
否则ComboBox被反复设置,影响效率。