VB6 数组

来源：百度知道 编辑：UC知道 时间：2024/06/01 16:31:46
这是一个空数组，
1 Dim tArray() as Integer
2 Dim V
3 For Each V In tArray
4 ....
5 Next
这时候，每当运行到代码 3 或者 5 的时候都出现了同样错误，错误代码是 92，请问如何避免出现这样的问题。
请给出必要的示例代码。

被BS了

目录:
1 检讨
2 测试
3 自己常用的地方想到的
4 复制来的定义以及演示
5 问题的可能性
6 再次检讨

看来这态度还是不行的.

认真查了一下,参考这里的错误号码:
http://www.5iask.com/info/2006-07/29523.htm

92 ---- For 循环未初始化

由于现在手头上没有VB6的工具.临时用vbs测试了一下.没有发现楼主所出现的问题.成功结束了.代码如下
Dim tArray()
Dim V
For Each V In tArray
msgbox ".... "
Next
msgbox "over"

认真看了一下,回想自己的用途.一般是数据集返回之后才经常用到的吧.

前面加一个判断是否为空. 就是ubound 如果recordset有自己的方法.只是想说明这个还是经常用到的办法罢了.

为什么你的会出现问题还不知道.而且这里不能用新版本的vb.net的某些规范来解释(Microsoft找不到旧的vb了,只有vbs的以及vb2005的,vbs的毕竟跟vb6不同,而2005的就更复杂了,有一个枚举接口)

看看这个:
-----------------------------------------------------------
For Each...Next 语句
对数组或集合中的每个元素重复执行一组语句。

For Each element In group
[statements]
[Exit For]
[statements]
Next [el