Select Case String.Empty/Nothing

[jsrc1990]

Saludos,

Tengo un problema, Cuando halla una consulta de un solo Registro quiero diferenciar: Si salió la consulta correcta, si no se encontro el Registro ó si hubo un problema de Conexion con el Servidor, para luego mostrar por mensaje, bien.

Me vuelo todo el proceso de Conexion del ExecuteScalar porque los duermo , solo especifico que cuando:

"Valores en el String" = Valores consultados Correctamente
Nothing = No encontro algun Registro
String.Empty = Error en el Servidor

Dim String1 As String

String1 = String.Empty / Nothing

Select Case String1
Case String.Empty
MsgBox("String.Empty")
Case Nothing
MsgBox("Nothing")
Case Else
MsgBox("Correcto")
End Select

Pero resulta que si el String1 contiene ya sea un String.Empty o un Nothing, pasa por cualquiera de los 2 Cases descritos anteriormente, NO HAY DIFERENCIA entre uno y el otro, tambien he provado con "", pero tambien vale lo mismo y no lo hago con Numeros porque en el caso de que cargue algun Numero puede causar problemas de comparacion

Quiero hacerlo Con Select Case ya que el Valor String1 lo Evalua una vez.

Alguien conoce alguna forma de Diferenciar con Select Case si es Nothing o Empty.String?

Gracias de Antemano.

Jsrc1990

[mortentor]

Hola,

estuve probando el código rápidamente y es raro que no funcione, pero probe con esto y funciona perfectamente.

Código ASP:

Dim string1 As String = String.Empty
 
        If string1 Is String.Empty Then
            Console.WriteLine("String.Empty")
        ElseIf string1 Is Nothing Then
            Console.WriteLine("Nothing")
        Else
            Console.WriteLine("Correcto")
        End If
 

ya me contará =)

Un saludo.

[jsrc1990]

Hola, gracias por responder , pues si de esa ya la habia provado y si funciona, lo malo es que valida el String1 en todos los elseif y con Select Case solo 1 vez por todos los cases.

Tambien he provado con Case Is = ... y lo mismo, Case Is DBNull.Value no se puede, Case Is = DBNull.Value no lo permite, con VariantType.Empty;VariantType.Null, vbEmpty; vbNull, pero lo malo es que la representacion es en Numeros y si cargara por eje un Consecutivo y se choque con un 0 o un 1 que son las representaciones daria error cuando en realidad no lo es.

Y no se que hacer, estaré destinado a usarlo de esa forma?

Mas ideas?

Jsrc1990

[mortentor]

Hola de nuevo,

Yo creo que a lo mejor es un error del compilador y si por ejemplo string1 es nothing al hacer la comprobación directamente le da igual el string.empty y lo convierte siempre a nothing y viceversa.

Y en cuanto a lo de que en el if comprueba todos y en el case solo una vez ¿que mas da?, cuanta diferencia hay 1 microsegundo quizas? y recuros, 1 bit? no se no cuesta nada.

ya me contará como le va en eso.

Un saludo.

[jsrc1990]

Hola, gracias nuevamente por responder ,

Bueno pues si, será error del compilador que los toma por igual, pero con Select Case me ahorraria no unicamente la Validacion del String1 en cada Elseif, si no que ademas la creacion de un Nuevo objeto en Memoria; String1 ya no existiria!! ya que haria algo asi:

Select Case Conexion1.Consultar_Codigo(TbxCodigo.Text)
Case String.Empty
MsgBox("String.Empty")
Case Nothing
MsgBox("Nothing")
Case Else
MsgBox("Correcto")
End Select

y me saltaria la Asignacion y luego la susodicha comprobación, pero bueno..., hecho y pecho me tocara continuar con los Elseif, de todas formas si encuentras o alguien encuentra alguna solucion favor me diga.

Gracias de Verdad.

Jsrc1990

[mortentor]

Hola,

Pero intentando ahorrar cuanta memoria repito 5bits? 1kb? no se pero ahora ahorrar eso es perder el tiempo la verdad, ya no es tan necesario ahorrar memoria como antes, ahora la regalan xD asi que no pasa nada por unos cuantos kb.

Un saludo.

[jsrc1990]

Haha, ok ok, jeje Me molesta tener que crear un String de mas y me llena mas las lineas de Codigo, pero bueno..

Jsrc1990

[Malenko]

Sinceramente, creo que la forma más correcta de comprobar si ha habido un problema de conexión es mediante la captura de excepciones. Esto te permitirá saber si ha fallado al abrir la conexión, al ejecutarla o al acceder a un campo.

Por otro lado, ya que ha salido la discusión, un Select Case es más optimo que un If, ya que internamente funciona con una función de Hash y una tabla precalculada que permite saber exactamente a que parte del código a de saltar para ejecutar.

En cuanto a que en el ejemplo con los if's puesto por mortenor

Y en cuanto a lo de que en el if comprueba todos y en el case solo una vez ¿que mas da?, cuanta diferencia hay 1 microsegundo quizas? y recuros, 1 bit? no se no cuesta nada.

Eso en su código es falso. No tiene porque comprobar todos los if's, eso solo pasaría en el caso peor, pero independientemente de eso siempre hay que mirar de programar lo mejor posible. Es más eficiente y más limpio el código con select case que con if's anidados. Ya no se trata de "arañar 1 bit" sino de legibilidad del código. Yo, entre programar mal y programar bien, prefiero programar bien :)

[mortentor]

Hola,

Malenko estoy totalmente de acuerdo con usted, siempre hay que buscar hacer un código optimo, pero yo hice enfasis en lo del espacio porque jsrc1990 parecia que era lo que mas le preocupaba, tener un objeto en memoria.

Además asi sea menos optimo no creo que se pueda hacer con case, de verdad que lo he intentado jeje.

Un saludo ^^

[jsrc1990]

Saludos,

Y es que no es solo el hecho de tener un objeto más en memoria sino tambien porque como expresé anteriormente:

Me molesta tener que crear un String de mas y me llena mas las lineas de Codigo

Me hace el codigo mas cargado ya que hay que agregar mas lineas de codigo dejandolo mas sucio y menos limpio (No muy leible) como expresa makenlo, yo me esfuerzo porque el codigo sea lo mas posiblemente comprendible, pero si la herramienta no da para más, bueno que da, toca seguir adelante con lo que tienes y no echarse a morir como en la vida real.

Ahora bien, si encuentras la solucion, aplicala... y en cuanto a la solución pensando yo, podria reservar una frase que: tenga un nombre extraño la cual nadie registre (Muy poco seguro uno nunca sabe con lo que salen los usuarios ), no se pueda registrar en la Bd mediante un if antes de registrar o con un Check de Sql Server, la cual ya no sea de comparar String.Empty, sino por ejemplo "Error_Servidor":

Código ASP:

Select Case Conexion1.Consultar_Usuario(TbxUsuario.Text)
Case Nothing
MsgBox("Nothing")
Case "Error_Servidor"
MsgBox("Error")
Case Else
MsgBox("Correcto")
End Select
 

__________________________________________________ _____________

Código ASP:

.
.
.
Try
SqlConnection1.Open()
Object1 = SqlCommand1.ExecuteScalar()
Catch e As Exception
MsgBox("Error = " + e.Message)
Object1 = "Error_Servidor" 'Ya no String.Empty
Finally
SqlConnection1.Close()
End Try
 
Return Object1
 

Que os pareceis, que os agregais, cual de las 3 formas pensarian seria la mas optimar para reservar la frase?

Jsrc1990