高级会员
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
|
【转帖】vb.net Problem With For Each
vb.net problem with 'for each'
vb.net problem with 'for each'
private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click
listbox1.items.clear()
for n = 0 to pdb.blocks.count - 1
blockobj = pdb.blocks.item(n)
listbox1.items.add(blockobj.name)
for each entobj in blockobj
listbox1.items.add(entobj.objectname)
next entobj
next n
end sub
i have the above routine in vb.net. i find that i am unable to repeat this routine, unless the drawing is reloaded first.
the bocks list correctly, but on the second use the entities in each block are not found.
the multiple use of this routine works correctly in vb6.
any ideas please?
hi clive,
it is looks like i have fixed this problem. sorry but this fix does not included to 1.06 version. i think you can ask neil for update.
|