求助:)

showmetheway 2002-12-28 09:57:43

本想传一幅图上来,问题就在图上,可这的论坛没这个功能,只好麻烦好心人到这里去看看了:
http://java-china.vicp.net:6001/cgi-bin/topic.cgi?forum=20&topic=36&show=0
...全文
3 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
wangweicai 2002-12-29
我想:
For Each x In array1是指把array1中的一个元素赋值给x,
x=i只是改变了x的值,array1中的值没变,
所以调试时array1的值没变化,
如果已给array1赋值过,
那么调试里array1的内容应为赋值时的内容,
而不是x里的内容。
回复
xks 2002-12-28
没有给数组中的数据赋值啊!

像上面的这位兄弟!

这样可以了!
回复
wangweicai 2002-12-28
不对吧?x是循环参数,怎么能对它赋值?
这样改怎么样:
Dim Array1(0 to 4) as Integer
Private Sub Command1_Click()
Dim i as Integer
for i=0 to 4
Array1(i)=i
Next i
End Sub
回复
RandomLife 2002-12-28
第一次循环当然都是0,以后值就变了。
我试过了,很正常。
回复
showmetheway 2002-12-28
对不起,其实事情是这样的:
对于一个已被付值过的数组array1可以使用for each 成员 in array1语句依次输出每个元素的值(程序如下)
For Each x In array1
Print x;
Next x
但为什么不可以通过这样方法挨个给数组元素付值呢?
如:
For Each x In array1
x = i
i = i + 1
Next x
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7453

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告