51Testing软件测试论坛

标题: 为什么这个检查通不过，请告诉指教！ [打印本页]

作者: wxd3563003 时间: 2012-3-29 22:10
标题: 为什么这个检查通不过，请告诉指教！
Dim A
A =Date
datatable("AT",dtlocalsheet) = A
CStr DataTable("AT", dtLocalSheet)
Msgbox(A)
If datatable("AS",dtlocalsheet) = A Then
Reporter.ReportEvent micPass,"正确",""
else
Reporter.ReportEvent micFail,"错误","实际为："+DataTable("AS",dtlocalsheet)+"期望为："+DataTable("AT",dtlocalsheet)
End If
其中datatable("AS",dtlocalsheet)的值为2012-03-29，Msgbox(A)得到的值也是2012-03-29，但是为什么检查通不过呢？
提示信息：错误实际为：2012-03-29，期望为：2012-03-29 失败 2012-03-29 - 10:56:57

作者: mimmy 时间: 2012-3-30 00:53
A是日期型，类型不一样所以检查失败，改成这样datatable("AS",dtlocalsheet) =CStr(A)

作者: 黑羽祭 时间: 2012-3-30 09:05
回复 1# wxd3563003
我觉得是因为你拿日期型和数组进行比较了，所以就算字符一样，判断出来也是不一样的。
你试试将IF语句的条件改为：If cdate(datatable("AS",dtlocalsheet)) = cdate(A) Then 试试

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