Dim q As new QueryBuilderq.TableName = "临时表"q.SelectString = "Select DISTINCT 第一列, 第二列 From {表A}"q.Build
Dim cbx As WinForm.ComboBox = e.Form.Controls("ComboBox1")cbx.ValueMember = "第一列"cbx.DisplayMember = "第二列"cbx.DataSource = "临时表"