2

我正在尝试测试一个对象的实例,但 VB 呕吐并抛出异常:

Conversion from string "" to type 'Boolean' is not valid.

这是我的测试方式:

Dim objGA As New Gatherer.Gathered("", -1)
objGA = objGatherers(idx) 
If Not objGA Is Nothing Then  <--exception occurs here
   ' Do something here

End If

如果我不做这个检查,那么我会得到:

Object reference not set to an instance of an object.

我不明白第一个错误objGA是一个对象而不是一个字符串!

我还应该如何执行此测试?是否有一致的检查方法?

4

3 回答 3

2
If objGA IsNot Nothing Then
    ' put some code here...
End If

MSDN:IsNot 运算符

于 2013-10-22T11:06:16.810 回答
0

尝试这个。

尝试使用IsDBNull(oValue)方法检查空对象。 IsDBNull是检查空值的内置函数。

Dim oValue As Object
Dim DefaultValue As Object
    If IsDBNull(oValue) Then
        Return DefaultValue
    Else
        Return oValue
    End If
于 2013-10-22T10:48:55.260 回答
0

尝试这个:

    Dim objGA As New Gatherer.Gathered("", -1)
    Stop 'examine objGA
    objGA = objGatherers(idx)
    Stop 'examine objGA

第一站是 objGA 一个“聚集对象”吗?当您键入第一行时,它会告诉您返回类型是什么吗?

于 2013-10-22T11:53:24.177 回答