您的位置：程序门 -> vb -> 基础类

about listview

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

about listview

发表于：2007-07-19 13:34:18 楼主

数据库中，编号=6，数据类型=integer
listview1.listitems.add rs（ "编号 "), , "test ", 3, 3
....
listview1.listitems（rs（ "编号 ").icon=2
'每当运行到这里，提示无效的关键字,而当在debug窗口中测试结果却如下：
listview1.listitems（rs（ "编号 ").icon=2
'提示无效的关键字再测试如下
listview1.listitems（6).icon=2 '执行成功。
----------------------------
请问，应该如何解决，使listview1.listitems（rs（ "编号 ").icon=2有效??

发表于：2007-07-19 13:39:541楼得分:0

顶

发表于：2007-07-19 13:43:132楼得分:0

listview1.listitems（rs（ "编号 ")).icon=2

少一个右括弧吧

发表于：2007-07-19 13:45:303楼得分:0

首先谢谢做答，但不是这个原因，不好意思，这是刚太急发贴时的错误

发表于：2007-07-19 14:03:104楼得分:0

刚才又测试了一下，这样子都能用。
listview1.listitems.add rs（ "编号 "), , "test ", 3, 3
....
listview1.listitems（rs（ "编号 ")).icon=2
'每当运行到这里，提示无效的关键字,而当在debug窗口中测试结果却如下：
listview1.listitems（rs（ "编号 ")).icon=2
'提示无效的关键字再测试如下
a=rs（ "编号 ")
listview1.listitems（a).icon=2 '执行成功。为什么直接在 "a "处用rs（ "编号 ")却不行?

发表于：2007-07-19 14:18:295楼得分:0

求真理，顶一下。

发表于：2007-07-19 14:41:046楼得分:0

.........

发表于：2007-07-19 15:44:497楼得分:0

listview1.listitems（clng（rs（ "编号 "))).icon=2

或者：

dim idx as long
idx=rs（ "编号 ")
listview1.listitems（idx).icon=2

下一篇：关闭前面的窗口把文本框的值传到后面的页面
上一篇：关于access数据库空字符串

其他资讯