51Testing软件测试论坛

标题: 为什么DataTable为无线循环 [打印本页]

作者: 喵小妖7117 时间: 2015-10-23 15:57
标题: 为什么DataTable为无线循环
这是我写的一个脚本：
Dim i,j,A

j=DataTable.GetRowCount

For i=1 to j    '定义一个循环读取表格中的所有A列的值

   A=DataTable("p_yiyuan", dtGlobalSheet)    '读出

MSGBOX A                   '以弹出框的形式显示读取循环A列中的值

DataTable.SetNextRow

Next

不明白为什么结果会不停的循环，只能在任务管理器中结束QTP才行

求支招！

作者: 踏雪飞狐 时间: 2015-10-23 17:58
DataTable.GetRowCount你这是获取的所有表格的行数吧，所以一直循环，用这个试试
DataTable.ImportSheet "datatable.xls","G:\datatable.xls","Golbal"
'获取总行数
rcount=DataTable.GetSheet("sheet1").GetRowCount

作者: 喵小妖7117 时间: 2015-10-28 14:43

踏雪飞狐发表于 2015-10-23 17:58
DataTable.GetRowCount你这是获取的所有表格的行数吧，所以一直循环，用这个试试
DataTable.ImportSheet " ...

多谢，我会试试。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)