“天街小雨润如酥，草色遥看近却无。最是一年春好处，绝胜烟柳满皇都。”读一首古诗，心情也随之平静下来

循环将DataTable中的值输出到Reporter文件中

上一篇 / 下一篇  2008-06-30 14:01:33 / 个人分类：测试工具

查看( 566 ) / 评论( 0 ) / 评分( 0 / 0 )
Dim dtValue
For i = 0 to 10
  If dtValue = "" Then
      dtValue = dtValue + Cstr(i)   '如果输出DataTable中的值可以用DataTable(1,1)代替 i
  Else
      dtValue = dtValue + VbCrLf + Cstr(i) 'VbCr：回车 VbLf：换行 VbCrLf:回车换行
  End If
Next

Reporter.ReportEvent micPass,"file",dtValue

收藏 举报

TAG: QTP 测试工具 Reporter

 

评分：0

我来说两句

Open Toolbar