Question

access 组合框数据源用变量，怎么去掉重复值

access的组合框combo1的数据源是用的变量，但因为表[1查询](或[2查询])的字段[当前数据]内容有很多重复的，不知道怎么去除，求高人解答。
Dim str As String
Select Case num 'num是设置的变量
Case Is = 1
str = "SELECT [1查询].[当前数据] FROM 1查询 ORDER BY [当前数据]; "
Case Is = 2
str = "SELECT [2查询].[当前数据] FROM 2查询 ORDER BY [当前数据]; "
End Select
With combo1
.RowSourceType = "Table/Query" '设置行来源类型
.RowSource = str '设置行来源
.ColumnCount = 1 '设置组合框显示列数
End With

Answer 1

Select Case num    
Case Is = 1

怎麼一会num一会Is？

要去除select结果的重复值用distinct，比如：

SELECT distinct [1查询].[当前数据] FROM 1查询 ORDER BY [当前数据]

祝你成功！