VB6对象比较

发布时间：2020-12-17 07:21:03 所属栏目：百科来源：网络整理

导读：什么VB6方法允许两个相同类型的自定义对象(在类模块中定义)相互比较？我认为这与 Java的compareTo方法相当,但我无法在任何地方找到它. 解决方法如果通过“比较”表示“它们是同一类型吗？”,您可以使用TypeName函数： If (object1 Nothing) and (object2 No

什么VB6方法允许两个相同类型的自定义对象(在类模块中定义)相互比较？我认为这与 Java的compareTo方法相当,但我无法在任何地方找到它.

解决方法

如果通过“比较”表示“它们是同一类型吗？”,您可以使用TypeName函数：

If (object1 <> Nothing) and (object2 <> Nothing) then
  If (TypeName(object1) = TypeName(object2)) Then
    Debug.Print "object types are the same"
  Else
    Debug.Print "object types are NOT the same"
  End If
End If

如果通过“比较”表示“它们是否在内存中引用相同的对象？”,则可以使用Is运算符：

If (object1 Is object2) Then
  Debug.Print "objects references are the same"
Else
  Debug.Print "objects references are NOT the same"
End If

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!