参考:
http://www.foxtable.com/webhelp/topics/0696.htm,看
ExecuteReader的示例一
示例一
同样,假定窗口中有一个组合框(ComboBox),希望这个窗口能够列出订单表所有的客户名称,如果订单表采用动态加载,或者根本没有加载,那么显然无法从订单表中获得所有客户名称,只能利用ExecuteReader直接从后台提取:
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox
cmd.CommandText = "SELECT DISTINCT 客户 From {订单}"
dt = cmd.ExecuteReader()
cmb = e.Form.Controls("ComboBox1")
cmb.ComboList= dt.GetComboListString("客户")