vb spread 控件加载数据库内数据

VB code

    fpTypeSql = "select distinct GuestSname from " & DocSql & " order by GuestSname"        Dim cn As New ADODB.Connection    Dim rs As New ADODB.Recordset    cn.Open MDIForms.fwq    rs.Open fpTypeSql, cn, adOpenKeyset, adLockOptimistic    Set fpSumType.DataSource = rs        rs.Close    cn.Close

为何当我的查询语句中使用了distinct GuestSname 后spread就无法加载出我的查询结果呢?用*的话就可以!但我只需要其中的一个字段!

[解决办法]
rs.CursorLocation=adUseClient
rs.Open fpTypeSql, cn, adOpenKeyset, adLockOptimistic

是跟排序没关系的，distinct跟order by本来就是重复的。一个就够了
[解决办法]

SQL code

SELECT * ...