date1:比较数据1。
date2:比较数据2。
示例:
Dim tDateDiff,date1,date2 date1 = Now date2 = Date tDateDiff = DateDiff("d",date1,date2) Msgbox tDateDiff |
使用QTP执行以后的结果如图2-8所示。
图2-8
注:返回0是正确的,因为两个Date之间的天数差异是0天,读者可以自行尝试其他参数。
-函数实际项目臆测&点评-
作者很兴奋地告诉读者,使用好这个函数,QTP一样能做一些简单的性能测试工作!毕竟,这个函数可以对比两个事务间的时间间距,而且可以精确到以秒为单位!
Left 函数
作用:返回字符串最左边的指定数量的字符。
语法:Left (string, length)。
参数。
string:字符串表达式,其最左边的字符被返回。如果string参数中包含Null,则返回Null。
length:数值表达式,指明要返回的字符数目。如果是0,返回零长度字符串("");如果大于或等于string参数中的字符总数,则返回整个字符串。
示例:
Dim MyString, LeftString MyString = "VBScript" LeftString = Left (MyString, 3) ‘结果:最终应返回VBS |
-函数实际项目臆测&点评-
如果读者需要某个字符串的指定几个字符时,就是使用该函数的时机!
Right 函数
作用:返回字符串最右边的指定数量的字符。
语法:Right(string, length)。
参数。
string:字符串表达式,其最右边的字符被返回。如果string参数中包含Null,则返回Null。
length:数值表达式,指明要返回的字符数目。如果是0,返回零长度字符串("");如果大于或等于string参数中的字符总数,则返回整个字符串。
示例:
Dim MyString, RightString MyString = "VBSCript" RightString = Right (MyString, 6) ‘结果:最终应返回SCript |