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

关于listview的用法，奇怪，怎么看不到我家的东西，只看到checkbox!!!!!!!!!!!!!!!!!!!!!

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

关于listview的用法，奇怪，怎么看不到我家的东西，只看到checkbox!!!!!!!!!!!!!!!!!!!!![已结贴,结贴人:wangyounihao]

发表于：2008-01-28 16:24:57 楼主

关于listview的用法，
private sub form_load（)
listview1.view = lvwsmallicon
listview1.checkboxes = true
' dim i as integer
listview1.listitems.clear
' i = 0
' querystr.commandtext = "select distinct sname from tectab"
' set recorddb = new adodb.recordset
' recorddb.cursorlocation = aduseclient
' recorddb.cursortype = adopenkeyset
' recorddb.open querystr, , adopenstatic, adlockbatchoptimistic
' if recorddb.recordcount <> 0 then
' recorddb.movefirst
' while not recorddb.eof
' i = i + 1
' listview1.listitems.add i, recorddb!sname
' recorddb.movenext
' wend
' end if
' set recorddb = nothing

listview1.listitems.add 1, , "哈哈"
listview1.listitems.add 2, , "哈欧"
listview1.listitems.add 3, , "银川贝尔利科技开发有限公司"
listview1.listitems.add 4, , "哈哈"
listview1.listitems.add 5, , "哈欧"
listview1.listitems.add 6, , "银川贝尔利科技开发有限公司"
listview1.listitems.add 7, , "哈哈"
listview1.listitems.add 8, , "哈欧"
listview1.listitems.add 9, , "银川贝尔利科技开发有限公司"

为什么我从数据库里动态添加看不到我添加的文字，也就是上面引去的，而直接添加就可以呢？

发表于：2008-01-28 16:30:341楼得分:2

可能你用listview1.view=别的如report就好了，不要用图标，因为你没设置图标。。。

发表于：2008-01-28 17:32:112楼得分:2

没有问题啊，
'listview1.view = lvwsmallicon
这句话要不要好像，我这边都可以跑的

发表于：2008-01-28 22:27:213楼得分:2

做一个sql查询，将查询结果用listview1.listitems.add添加，看行不行？

发表于：2008-01-28 22:57:264楼得分:2

listview1.view
有四种视图，用一个正确的。

发表于：2008-01-28 23:37:225楼得分:12

listview1.listitems.add i, , recorddb!sname

发表于：2008-02-01 10:37:516楼得分:0

private sub form_load（)
listview1.view = lvwsmallicon
listview1.checkboxes = true
' dim i as integer
listview1.listitems.clear
' i = 0
querystr.commandtext = "select distinct sname from tectab"
set recorddb = new adodb.recordset
recorddb.cursorlocation = aduseclient
recorddb.cursortype = adopenkeyset
recorddb.open querystr, , adopenstatic, adlockbatchoptimistic
if recorddb.recordcount <> 0 then
recorddb.movefirst
'for i = 1 to recorddb.recordcount
' listview1.listitems.add i, recorddb!sname
'next
while not recorddb.eof
i = i + 1
listview1.listitems.add i, recorddb!sname
recorddb.movenext

wend
end if
set recorddb = nothing

listview1.listitems.add 1, , "哈哈"
listview1.listitems.add 2, , "哈欧"
listview1.listitems.add 3, , "银川贝尔利科技开发有限公司"
listview1.listitems.add 4, , "哈哈"
listview1.listitems.add 5, , "哈欧"
listview1.listitems.add 6, , "银川贝尔利科技开发有限公司"
listview1.listitems.add 7, , "哈哈"
listview1.listitems.add 8, , "哈欧"
listview1.listitems.add 9, , "银川贝尔利科技开发有限公司"
end sub

我这样就可以看到，后面加的就可以看到，前面加的就看不到

发表于：2008-02-01 10:39:187楼得分:0

丢了一个“,”,如clear_zero 所言，谢谢

其他资讯