没办法，不能这样设置，变一下
Dim cmb As WinForm.CheckedComboBox =e.SenderDim str As String =e.Form.Controls("ComboBox1").Valuecmb.ComboList = DataTables("dict").GetComboListString(str, str & "<> 'noyhing'") '列表项目来自
加好友 
发短信
Post By：2015/6/30 20:05:00 [显示全部帖子]
