在QTP中定义变量

上一篇 / 下一篇  2007-05-11 14:25:31 / 个人分类：QTP学习

查看( 4850 ) / 评论( 1 ) / 评分( 5 / 0 )

    将一个Object定义为一个变量，应使用Set语句，如：

 Function ShowFreeSpace(drvPath)
   Dim fso, d, s
   Set fso = CreateObject("scrīpting.FileSystemObject")
   Set d = fso.GetDrive(fso.GetDriveName(drvPath))
   s = "Drive " & UCase(drvPath) & " - "
   s = s & d.VolumeName  & "<BR>"
   s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0)
   s = s & " Kbytes"
   ShowFreeSpace = s
End Function

 

    也可以使用DIM语句申明其它类型的变量，如strings（字符型）, integers（整型）, 以及 arrays（数组）。

    DIM语句不是必须的，但是使用DIM语句可以使脚本清晰。

    定义数组变量：

 Dim A
A = Array(10,20,30)
B = A(2)   ' B is now 30.

    定义字符或整型变量：

 Dim MyVar, MyNum

 


收藏 举报

TAG: QTP学习

linglvchao的个人空间 引用 删除 linglvchao   /   2016-01-19 18:20:27
评 5 分
 

评分：0

我来说两句

Open Toolbar