Vb6 If语句总是进入else代码，即使条件应该为true

我在vb.6中给出了下面的条件，我的Obj1.Id=7777，但它总是在其他部分。请给我一些建议

If Obj1.ID <> Null And obj1.ID <> "" then
    str1="UPDATE"
Else
    str1="INSERT"
End IF

如果Obj1.ID为Null且Obj1.ID为“”，则
str1=“更新”
其他的
str1=“插入”
如果结束

您的问题是

运算符和

null

。在VB6中，没有任何内容等于或不等于Null。您必须使用

IsNull

函数：

If Not IsNull(Obj1.ID) And obj1.ID <> "" then

如果不为IsNull（Obj1.ID）和Obj1.ID“”，则

您还可以检查它是否为空：

If Not Obj1.ID Is Nothing And obj1.ID <> "" then

如果不是Obj1.ID，则Obj1.ID为Nothing，Obj1.ID为“”，则

您的问题是

运算符和

null

。在VB6中，没有任何内容等于或不等于Null。您必须使用

IsNull

函数：

If Not IsNull(Obj1.ID) And obj1.ID <> "" then

如果不为IsNull（Obj1.ID）和Obj1.ID“”，则

您还可以检查它是否为空：

If Not Obj1.ID Is Nothing And obj1.ID <> "" then

如果不是Obj1.ID，则Obj1.ID为Nothing，Obj1.ID为“”，则

您的问题是

运算符和

null

。在VB6中，没有任何内容等于或不等于Null。您必须使用

IsNull

函数：

If Not IsNull(Obj1.ID) And obj1.ID <> "" then

如果不为IsNull（Obj1.ID）和Obj1.ID“”，则

您还可以检查它是否为空：

If Not Obj1.ID Is Nothing And obj1.ID <> "" then

如果不是Obj1.ID，则Obj1.ID为Nothing，Obj1.ID为“”，则

您的问题是

运算符和

null

。在VB6中，没有任何内容等于或不等于Null。您必须使用

IsNull

函数：

If Not IsNull(Obj1.ID) And obj1.ID <> "" then

如果不为IsNull（Obj1.ID）和Obj1.ID“”，则

您还可以检查它是否为空：

If Not Obj1.ID Is Nothing And obj1.ID <> "" then

如果不是Obj1.ID，则Obj1.ID为Nothing，Obj1.ID为“”，则

您如何设置Obj1.ID的值？我从数据库中获取您是否调试到代码中以确保您获取的值确实是7777？是的，它是相同的值是否有其他方法检查对象值比较？您如何设置Obj1.ID的值？我从数据库中获取您是否调试到代码中以确保您获取的值回迁真的是7777？是的，它是相同的值是否有其他方法检查对象值比较？如何设置Obj1.ID的值？我是从数据库回迁的您是否已调试到代码中以确保您回迁的值真的是7777？是的，它是相同的值是否有其他方法检查对象值比较？如何设置Obj1.ID的值？我正在从数据库中获取您是否已调试到代码中，以确保您获取的值确实是7777？是的，它是相同的值是否有其他方法检查对象值比较？