| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 784 人关注过本帖
标题:求助combo控件
只看楼主 加入收藏
caiyunxiang1
Rank: 1
等 级:新手上路
帖 子:5
专家分:2
注 册:2010-1-18
结帖率:50%
收藏
已结贴  问题点数:10 回复次数:5 
求助combo控件
Private Sub Form_Load()
Text1.Text = ""
Call condatabase   '连接数据库
Dim rsload As ADODB.Recordset   '设置记录集并连接user_load表
Set rsload = New ADODB.Recordset
rsload.open "select * from user_load", cn, adOpenStatic, adLockPessimistic
Combo1.Clear
Do Until rsload.EOF
Combo1.AddItem rsload.fields("user_name")  '下拉列表添加用户名称
rsload.movenext
Loop



End Sub
运行出现rsload的用户定义类型未定义,是怎么回事啊
搜索更多相关主题的帖子: combo 控件 
2010-04-19 18:54
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:2 
是网上down 的代码吧.

工程 ->  引用
Microsoft ActiveX Data Objects 2.? Library
? 代表 0 1 5 6 7 8 中的任意一个.



授人于鱼,不如授人于渔
早已停用QQ了
2010-04-19 20:28
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:66
帖 子:1310
专家分:5312
注 册:2009-2-26
收藏
得分:2 
推荐七。
2010-04-20 00:09
caiyunxiang1
Rank: 1
等 级:新手上路
帖 子:5
专家分:2
注 册:2010-1-18
收藏
得分:0 
呵呵,书上的,自己运行就出现这个问题了
2010-04-20 20:04
zhujiang328
Rank: 2
等 级:论坛游民
帖 子:14
专家分:19
注 册:2007-9-7
收藏
得分:2 
同意二楼
2010-04-21 09:53
寻找
Rank: 2
等 级:论坛游民
帖 子:132
专家分:19
注 册:2007-3-2
收藏
得分:2 
二楼正解
2010-04-21 10:47
快速回复:求助combo控件
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016223 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved