jueves, 19 de agosto de 2010

Diferencias entre ISDBNULL y IS NOTHING

IS NOTHING se utiliza para especificar que un tipo de referencia que no apunta a nada.
 DBNull Value es un producto único objeto que se utiliza para indicar que un tipo de base de datos tiene un valor de base de datos de Null.

 Ejemplo 

 Sub Main ()
        Dim P As Object Dim P As Object
        Dim I As Integer Dim I As Integer

        Debug.Print( "1. P is not set to anything." ) Debug.Print ("1. P no está en ninguna parte.")
        Debug.Print( "P Is Nothing: " & (P Is Nothing )) Debug.Print ("P es nada:" & (P Is Nothing))
        Debug.Print( "P Is DBNull.Value: " & (P Is DBNull.Value)) Debug.Print ("P ¿Es DBNull.Value:" & (P ¿Es DBNull.Value))
        Debug.Print( "----------" ) Debug.Print ("----------")

        P = New Object () P = new Object ()

        Debug.Print( "2. P is set to a new object." ) Debug.Print ("2. P se establece en un nuevo objeto.")
        Debug.Print( "P Is Nothing: " & (P Is Nothing )) Debug.Print ("P es nada:" & (P Is Nothing))
        Debug.Print( "P Is DBNull.Value: " & (P Is DBNull.Value)) Debug.Print ("P ¿Es DBNull.Value:" & (P ¿Es DBNull.Value))
        Debug.Print( "----------" ) Debug.Print ("----------")

        P = DBNull.Value P = DBNull.Value

        Debug.Print( "3. P is pointing to the special singleton class DBNull." ) Debug.Print ("3. P apunta a la clase singleton DBNULL especiales.")
        Debug.Print( "P Is Nothing: " & (P Is Nothing )) Debug.Print ("P es nada:" & (P Is Nothing))
        Debug.Print( "P Is DBNull.Value: " & (P Is DBNull.Value)) Debug.Print ("P ¿Es DBNull.Value:" & (P ¿Es DBNull.Value))
        Debug.Print( "----------" ) Debug.Print ("----------")

        I = Nothing I = Nada

        Debug.Print( "4. I is not set to anything." ) Debug.Print ("4. No se establece en algo.")
        Debug.Print( "I Is Nothing: " & (IsNothing(I))) Debug.Print ("Yo no es nada:" & (IsNothing (I)))
        Debug.Print( "I Is DBNull.Value: " & (IsDBNull(I))) Debug.Print ("I Ain't DBNull.Value:" & (IsDBNull (I)))

    End Sub End Sub

1. 1. P is not set to anything. P no está en ninguna parte.
P Is Nothing: True P ¿Es Nada: Verdadero
P Is DBNull.Value: False P ¿Es DBNull.Value: Falso
---------- ----------
2. 2. P is set to a new object. P se establece en un nuevo objeto.
P Is Nothing: False P ¿Es Nada: Falso
P Is DBNull.Value: False P ¿Es DBNull.Value: Falso
---------- ----------
3. 3. P is pointing to the special singleton class DBNull. P apunta a la clase singleton DBNULL especiales.
P Is Nothing: False P ¿Es Nada: Falso
P Is DBNull.Value: True P ¿Es DBNull.Value: Verdadero
---------- ----------
4. 4. I is not set to anything. No se establece en algo.
I Is Nothing: False Yo no es nada: Falso
I Is DBNull.Value: False I ¿DBNull.Value: Falso 
  

Para finalizar existe 2 formas de usar isnothing ejemplo

'http://lafabricadesoftware.blogspot.com/
If IsNothing(myObject) then
End If
If myObject Is Nothing then
End If

 

Tomado de referencia de http://www.devblog.com/2007/11/nothing-and-null-in-vbnet.html

No hay comentarios:

Publicar un comentario