combo控件的问题
cn.OpenDimSqlAsStringSetrs=NewADODB.Recordsetrs.Source="selectTNAMEfromSET_DB_TABLE_N...
cn.Open
Dim Sql As String
Set rs = New ADODB.Recordset
rs.Source = "select TNAME from SET_DB_TABLE_NAME"
Set rs.ActiveConnection = cn
rs.Open
Dim i As Integer
Do While Not rs.EOF
Combo1.AddItem rs("TNAME"), i
i = i + 1
rs.MoveNext
Loop
在load事件里我把数据加载到combo下拉框里了
在运行的时候我要选中其中的一个做分类查询
可是选的数据不能在combotext里显示
高手看看,怎么回事? 展开
Dim Sql As String
Set rs = New ADODB.Recordset
rs.Source = "select TNAME from SET_DB_TABLE_NAME"
Set rs.ActiveConnection = cn
rs.Open
Dim i As Integer
Do While Not rs.EOF
Combo1.AddItem rs("TNAME"), i
i = i + 1
rs.MoveNext
Loop
在load事件里我把数据加载到combo下拉框里了
在运行的时候我要选中其中的一个做分类查询
可是选的数据不能在combotext里显示
高手看看,怎么回事? 展开
3个回答
展开全部
Combo1.AddItem rs("TNAME"),Value, i
回答者:bluebell_dz - 秀才 三级 8-11 15:44
是你的属性选的不对吧!!
我记得好象在list属性下吧!!
回答者:bluebell_dz - 秀才 三级 8-11 15:44
是你的属性选的不对吧!!
我记得好象在list属性下吧!!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Combo1.AddItem rs("TNAME"),Value, i
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询