7,785
社区成员
发帖
与我相关
我的任务
分享VB中有关集合的问题
代码如下：
cb_行业.AddItem CStr(HangYColl.Item(i))
其中：“cb_行业”是个Combo
HangYColl是个Collection
我可以读出HangYColl的COUNT，证明HangYColl里面应该有值。但是为什么我用上面这个语句时产生一个错误”对象不再有效“？
请各位高手解决以下，感激不尽！
cb_行业.AddItem CStr(HangYColl.Item(i))
其中：“cb_行业”是个Combo
HangYColl是个Collection
我可以读出HangYColl的COUNT，证明HangYColl里面应该有值。但是为什么我用上面这个语句时产生一个错误”对象不再有效“？
请各位高手解决以下，感激不尽！
...全文
请发表友善的回复…
发表回复
flyingZFX 2004-04-30
- 打赏
- 举报
哈哈，
我知道了，，
正好我也遇到过这种情况，，
呵呵，，
我敢保证，你的HangYColl.Item(i)里存的肯定是一个对象，比如：RecordSet (记录集)
这样是不行的!!
存对象可以，但是，在用之前，绝对不能释放了它!!
不然，当然没有了，
所有，最好还是存字符串吧!!
我知道了，，
正好我也遇到过这种情况，，
呵呵，，
我敢保证，你的HangYColl.Item(i)里存的肯定是一个对象，比如：RecordSet (记录集)
这样是不行的!!
存对象可以，但是，在用之前，绝对不能释放了它!!
不然，当然没有了，
所有，最好还是存字符串吧!!
lxxldd 2004-04-30
- 打赏
- 举报
不知道怎么回事
帮你up
帮你up
walksnake 2004-04-30
- 打赏
- 举报
Dim HangYColl AS New Collection
Set HangyColl=GetHangyColl() 'GetHangyColl是专门来取得数据的一个过程
我把从RecordSet取出来的数据放在里面。
Set HangyColl=GetHangyColl() 'GetHangyColl是专门来取得数据的一个过程
我把从RecordSet取出来的数据放在里面。
supergreenbean 2004-04-30
- 打赏
- 举报
HangYColl里面放了什么东西?
ryuginka 2004-04-30
- 打赏
- 举报
Collection怎么用?
walksnake 2004-04-30
- 打赏
- 举报
这个没问题啊,我是从1开始的啊.
leolan 2004-04-30
- 打赏
- 举报
Collection的下限為1,即for i=1 to HangYColl.count
walksnake 2004-04-30
- 打赏
- 举报
CSDN中有没有高手啊？
walksnake 2004-04-30
- 打赏
- 举报
大家请帮个忙啊！
walksnake 2004-04-30
- 打赏
- 举报
OK,谢谢各位！
sunjiujiu 2004-04-30
- 打赏
- 举报
同意 flyingZFX(我飞！我飞！我飞呀飞！) 的观点
以下是我实验的代码，没有问题
Dim HangY As New Collection
HangY.Add "1"
HangY.Add "2"
HangY.Add "3"
HangY.Add "4"
HangY.Add "5"
Dim i As Integer
For i = 1 To 5
Combo1.AddItem HangY(i)
Next
解决办法也是同意HangYColl.Item(i)的观点
以下是我实验的代码，没有问题
Dim HangY As New Collection
HangY.Add "1"
HangY.Add "2"
HangY.Add "3"
HangY.Add "4"
HangY.Add "5"
Dim i As Integer
For i = 1 To 5
Combo1.AddItem HangY(i)
Next
解决办法也是同意HangYColl.Item(i)的观点
sunjiujiu 2004-04-30
- 打赏
- 举报
还真是挺怪的,我试试吧
