此主题相关图片如下:数据源.png
Dim cmd As New SQLCommandDim dt As DataTablecmd.Ccmd.CommandText = "SELECT DISTINCT 出库用途 From {列表项目}"dt = cmd.ExecuteReaderTables("出库明细").Cols("出库用途").Combolist = dt.GetComboListString("出库用途")
老师,代码对吗?数据源表应摆在那个文件夹中。现在找不到。