问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

...记录,查询结果在LISTLIEW控件中显示。需要详细代

发布网友 发布时间:2024-10-13 23:20

我来回答

3个回答

热心网友 时间:2024-10-14 00:29

Do While Not rs.EOF
rs.MoveNext
Set itm = ListView1.ListItems.Add
itm.Text = rs!所在系部
itm.SubItems(1) = rs!班级
itm.SubItems(2) = rs!学号
Loop

改成
Do While Not rs.EOF
Set itm = ListView1.ListItems.Add
itm.Text = rs!所在系部
itm.SubItems(1) = rs!班级
itm.SubItems(2) = rs!学号
rs.MoveNext
Loop
把 rs.MoveNext 移到 loop前
你那样的话 第一条记录不会添加上 而到了最后一条语句 就出错了
这是个逻辑的问题 楼上的回答也犯了这个错误哦

热心网友 时间:2024-10-14 00:34

Dim conn As ADODB.Connection '定义连接对象
Dim rs As ADODB.Recordset '定义记录集对象
实例化:
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
打开连接:
conn.Open "Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sa;Initial Catalog=检测中心计算机维修耗材统计系统;Data Source=ZHBI007\JCZX"
rs.Open "select * from IP地址 where 单位 = '" & Trim(Text1.Text) & "'", conn, adOpenKeyset, adLockOptimistic

'最后就是你说的把“产品名称” 显示到combox中了

While rs.EOF = False
Combo1.AddItem rs.Fields("IP地址")
rs.MoveNext
Wend

热心网友 时间:2024-10-14 00:30

给你一个提示吧..详细代码自己写...哪有这样的事,..都不知道你的那些控件名称,杂给你详细???

sql="select * from [student] where [系]='" & text1.text & "'" and [年级]='" & text2.text & "'"
'上面一句是查询用的..

'下面一句是把查出来的记录写以LIST中的.
do while not rs.eof
rs.movenext
listview1.addnew rs.files ("0")
loop
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
卡耐基的智慧大全集内容简介 会说话赢天下内容简介 卡耐基演讲与口才内容简介 商务口才训练内容简介 卡耐基金牌口才作者简介 卡耐基商务口才 作者简介 爱因斯坦的更多故事 杨柯叶谨言是什么电视 房贷和消费贷利率差别不大,但是还款金额差别挺大,都是怎么计算的... ...11月18号提现1500元、,11月25号还款1515,请问我还需要还 吴江有哪些地方卖家具的?想买套餐桌,去了华东,转了一圈没喜欢的... 高空坠物物业免责有哪些? 高空坠物照下来的责任如何划定 一般高空坠物几楼免责不用处罚 这样的男人才更能征服女人星座 当十二星座闯荡江湖他属于哪个门派 温岭女子高架龟速开车,并开窗牵绳遛狗,高架行车要符合哪些规定?_百度... 小孩子几个月开始吃辅食 几个月添加辅食比较好 婴儿在几个月可以吃辅食 几个月加辅食最好 电话机上对着说话的这个叫听筒还是话筒还是别的?要标准。 ...同时日出? 同一纬度,日出时间和时刻有什么关系呢? 怎么把电脑上下的一些软件游戏导入到iPhone中,用91还是itunes求详细过... 怎么把一个电脑游戏的大型游戏放进我的iPhone手机里面 求解 中国古代数学是舶来的还是华夏文明固有的原 怎么从电脑上下载游戏到手机上,iphone手机 天翼联想a68e手机如何把一键开关(数据流量开关 wifi gps等)设置到下拉... note2主屏幕最上方的小部件显示栏(GPS、移动数据连接,短信提示,无线等... ...设置通知栏下滑后上面有网络和无线网,电灯,GPS等选项? 一般高空坠物几楼免责 ...给我一个VB连接access的代码啊,菜鸟一枚,最好是特别详细的,从... 怎样鉴别绿松石有无灌胶 绿松石,为什么难鉴定 建筑高空坠物责任划分方法是什么? 写字楼高空坠物免责声明事由有哪些? 科目四在哪预约考试? 高空坠物物业的责任有吗? 白金、黄金最新价格 山西游客称重庆酒店鱼香肉丝无木耳不正宗,南北饮食文化差异有多大? 重庆一男子嫌川菜不正宗,拒绝支付饭钱,你觉得这个钱该不该给? 不喜欢火锅的人来到重庆该如何选择饮食? ...没有了声音,明明把静音都关闭了。为什么打电话,其他应用都听不到... ...铃声关闭了,但是我在设置里看没有关,这是怎么回事? 你是人吗? 答案三个字跟畜生有关 请在下面每条横线上填上合适的词语(三个字),与后面的动物组成成语。_百 ... 请问车氧佳除碳王的性价比咋样? 为什么车氧佳除碳王能这个快红呢? 越南花梨木手串如何盘 为什么车氧佳除碳王的发展一直都那么好呢?