Dim cmd As New SQLCommandDim dt As DataTableDim cmb As WinForm.ComboBoxcmd.CommandText = "SELECT DISTINCT 客户 From {视图名称}"dt = cmd.ExecuteReader()cmb = e.Form.Controls("ComboBox1")cmb.ComboList= dt.GetComboListString("客户")