S小虾米 发表于 2010-4-1 14:42:51

这段脚本有错么？

各位战友帮助看看哈，下面的脚本哪儿不对哈？现在print(Error1)出来的结果直接是未比较前的Error1的结果
Dim a
a = Array(0.04,0.04,0.04,0.03,0.03,0.015,0.015,0.01,0.01)
For i = 0 To 8 step 1
   Error1 = obj.GetSubItem(i*3,0)
   No1 = obj.GetSubItem(i*3+2,3)
               If No1 > a（i)Then
                       print(Error1)
               End If
Next

S小虾米 发表于 2010-4-1 14:44:57

Error1分别为-1，2，-2，3，-3......
No1的值分别为0.004，0.025，0.036.......
想让No1分别和a(i)作比较后，返回不符合的Error1的值

S小虾米 发表于 2010-4-1 14:49:16

自己在顶下，不知道哪儿不对了，战友们帮帮忙:(

lantianwei 发表于 2010-4-1 15:19:03

对No1 进行下数据转换 估计数据类型不一致

k4124k 发表于 2010-4-1 15:28:11

首先：a（i) 中i的左括号与右括号 不一样哦~~~
其次：你的obj对象没有声明
然后：你的GetSubItem函数是哪里来的。。。起码你帖的东西里看不到~~

[ 本帖最后由 k4124k 于 2010-4-1 15:34 编辑 ]

S小虾米 发表于 2010-4-1 15:55:11

哦，括号是刚刚输进来的时候打错了。然后obj在前面定义了，没有贴出来：（

S小虾米 发表于 2010-4-1 15:56:07

谢谢4楼的版主哈，我去试下：）

lantianwei 发表于 2010-4-1 16:00:59

Try
If CDbl(No1) > a(i)Then

shotstar 发表于 2010-4-1 16:17:44

不太清楚LZ的那个方法的作用是干什么，只通过命名知道估计去获取数组里的元素的，不过不清楚你那2个参数的含义。
如果可以请发一下GetSubItem的代码，谢谢。

S小虾米 发表于 2010-4-1 17:10:58

原帖由 lantianwei 于 2010-4-1 16:00 发表 http://bbs.51testing.com/images/common/back.gif
Try
If CDbl(No1) > a(i)Then
好了，就是数据类型的原因，谢谢版主
谢谢各位战友了：）
页: [1]
查看完整版本: 这段脚本有错么？