for循环中使用if语句的格式

npy912 · 发表于 2007-10-22 16:20:55

请问高手们for循环中使用if语句的格式，谢谢大家了在线等

sunwf1212 · 发表于 2007-11-5 10:54:09

VB的语法格式很重要哦!

npy912 · 发表于 2007-10-22 17:45:06

感谢大家是格式的事 17#说的对谢谢献花

jackymail · 发表于 2007-10-22 17:27:11

原帖由 npy912 于 2007-10-22 17:10 发表
还是一样没有任何变化

if condition then statement

if confition then
statement
else
statement
end if

你把then 后面的句子拿到下面另起一行

还有next 后面的i去掉，又不是数组。i什么i

For i=1 to 10
Browser("login").Page("安防系统").Frame("incFrame").Image("Tplus").Click
Browser("login").Page("安防系统").Frame("incFrame").Link("出库").Click
If i=1 Then
   Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息").Click
Else
   Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click
End If
Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click
Browser("login").Page("安防系统").Frame("incFrame1_2").Link("卡输出").Click
wait(1)
Browser("login").Dialog("文件下载").WinButton("保存(S)").Click
Browser("login").Page("安防系统").Sync
Dialog("文件下载").Dialog("另存为").WinButton("保存(S)").Click
Dialog("下载完毕").WinButton("关闭").Click
Browser("login").Page("安防系统").Sync
Next
Browser("login").Close

[ 本帖最后由 jackymail 于 2007-10-22 17:30 编辑 ]

Ramon22 · 发表于 2007-10-22 17:23:51

15楼的说的有道理。

tonyzhangjie · 发表于 2007-10-22 17:22:25

Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click
建议F11调下看看i=2时是不是走到了这个页面,有没有Link("详细信息_2")这个对象

Ramon22 · 发表于 2007-10-22 17:20:24

你先把For...Next循环注释掉，Run一下。看有没有错。

npy912 · 发表于 2007-10-22 17:17:26

把next 后面的i去掉了还是不行都是一样的错误提示

npy912 · 发表于 2007-10-22 17:15:01

对是执行9遍，主要是想实现这样的脚本。

npy912 · 发表于 2007-10-22 17:10:00

还是一样没有任何变化

tonyzhangjie · 发表于 2007-10-22 17:09:13

Else Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click
照你这个写法循环执行完不是要执行9遍click Link("详细信息_2")么?不知道你是不是要这样的操作...
还有就是next i的i不用

Ramon22 · 发表于 2007-10-22 17:06:02

把Next i 后面的i去掉，试一下。

npy912 · 发表于 2007-10-22 17:04:51

就是这个脚本

npy912 · 发表于 2007-10-22 17:02:15

For i=1 to 10
Browser("login").Page("安防系统").Frame("incFrame").Image("Tplus").Click
Browser("login").Page("安防系统").Frame("incFrame").Link("出库").Click
If i=1 Then Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息").Click
Else Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click
End If
Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click
Browser("login").Page("安防系统").Frame("incFrame1_2").Link("卡输出").Click
wait(1)
Browser("login").Dialog("文件下载").WinButton("保存(S)").Click
Browser("login").Page("安防系统").Sync
Dialog("文件下载").Dialog("另存为").WinButton("保存(S)").Click
Dialog("下载完毕").WinButton("关闭").Click
Browser("login").Page("安防系统").Sync
Next i
Browser("login").Close

tonyzhangjie · 发表于 2007-10-22 16:55:23

这个肯定不是循环if的问题,可能是你语句没描述清楚
还有就是你把你想怎么操作说具体点把,不太明白你的意思...

npy912 · 发表于 2007-10-22 16:45:23

详细信息是这个Line (5): "Else Browser("login").Page("安防系统").Frame("incFrame1").Link("详细信息_2").Click".

npy912 · 发表于 2007-10-22 16:38:54

错误提示是
The test run cannot continue due to a syntax error.

缺少 'Next'

npy912 · 发表于 2007-10-22 16:32:06

我想实现比如
for i=1  to 100
  if i=1 then a
else  b
  end if
next

Ramon22 · 发表于 2007-10-22 16:25:56

for i = 1 to 10
if i = 5 then
....
end if
.......
next

[ 本帖最后由 Ramon22 于 2007-10-22 16:33 编辑 ]

		自动登录	找回密码
密码			(注-册)加入51Testing

[求助] for循环中使用if语句的格式

相关帖子

呵呵,好好学习VB的语法格式吧!!

回复 10# 的帖子

回复 9# 的帖子

站长推荐 /1