Set RstX = New ADODB.Recordset
StrSql = "SELECT Att_Code, Att_Name From Pro_Att "
RstX.Open StrSql, Cn, adOpenKeyset, adLockOptimistic
With DataCombo
Set .RowSource = RstX
.BoundColumn = "Att_Code"
.ListField = "Att_Name"
End With
Pro_Att表记录
001 大型
002 中型
003 小型
DataCombo显示结果:
大型
中型
小型
我想在第一条记录前加个不属入表里记录的“所有”
DataCombo显示结果:
所有
大型
中型
小型
这个功能怎么实现
象Comboxbox控件的 Comboxbox。additem "所有"
用select 语句解决.这是窍门,呵呵.
SELECT '' as Att_Code, '所有' as Att_Name From Pro_Att
union
SELECT Att_Code, Att_Name From Pro_Att