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 IfEnd 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总结
以上是内存溢出为你收集整理的VB6对象比较全部内容,希望文章能够帮你解决VB6对象比较所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)