作者saap (saap)
看板Visual_Basic
标题[VB6 ] ListBox的ListCount超出32768怎麽读资料???
时间Sat Sep 9 07:56:57 2006
小弟写了一个程式把一些事件依顺序丢到ListBox里,
并且再用Print #1指令把ListBox的内容写到一个档案里,
但是因为事件太多(共有50000多个),
当我去查list1.listcount时其值是负的,
这时问题来了,
为了这个原因因此我把程式改成:
dim i as integer
Open "test.txt" For Output As #1
For i=0 To 32767
Print #1, List1.List(i)
Next i
For i=-32768 To List1.ListCount-1
Print #1, List1.List(i)
Next i
Close #1
结果前32768笔都可以正常写到档案里,
但从32769笔之後都无法正常写到档案里,
(档案里从32768笔後都是空白)
可是ListBox在萤幕前都是正常显示啊,
不知有无大大有解决方案,
谢谢。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.104.167.63