参考:
1、
http://www.foxtable.com/help/topics/2910.htm
2、
http://www.foxtable.com/help/topics/2048.htm
dim a as string
dim b as new sqlcommandb.commandtext="select bbh03 fro m bbh1 where lx=1"Dim dt As DataTable = b.ExecuteReader()
e.form.Controls("ComboBox1").Combolist = dt.GetComboListString("bbh03")