Visual Basic - Tipos de datos

Life is soft - evento anual de software empresarial
 
Vista:

Tipos de datos

Publicado por walter (4 intervenciones) el 28/02/2020 16:13:29
Hola querido grupo.
Les quiero pedir su ayuda en lo siguiente:
Estoy trabajando con base de datos SQL SERVER 2005 y V.B. 6.0 y el problema que tengo es que en la base de datos (B.D.) tengo una tabla con un campo de tipo BIT (boolean), el cual guarda TRUE o FALSE. Pero al momento de rescatar el valor de la B.D. a V.B. el valor me lo trae como FALSO y no como FALSE y TRUE como VERDADERO.
Alguna ayuda por esto por favor.

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Antoni Masana
Val: 1.229
Bronce
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Tipos de datos

Publicado por Antoni Masana (444 intervenciones) el 28/02/2020 17:54:01
No entiendo ¿Cual es el problema?

Una variable Booleana sirve para una condición:

1
2
3
4
5
IF Variable_Booleana Then
    MsgBox "El valor de la variable es: Verdadero, True, Vrai, Vero, Real, Wahre"
Else
    MsgBox "El valor de la variable es: Falso, False, Faux, Finto, Errado, Falsch"
End If

Como puedes ver según el valor de la variable se puede poner el Verdadero o False en el idioma que quieras, internamente es un 1 o un 0, y el sistema te lo traduce según unas directivas internas, cambialas y usa las tuyas como en el ejemplo.

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Tipos de datos

Publicado por walter (4 intervenciones) el 28/02/2020 19:48:04
Lo primero, gracias por responder.
En mi computador no tengo problemas con las datos, pero cuando el mi sistema se ejecuta en un PC con WIN 10 no es lo mismo "FALSE" que "FALSO". ejemplo:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim rst As ADODB.Recordset
Dim sino as Boolean
 
sql = "select casado from usuario where id = "& Text1.Tag &""
set rst = cnn.Execute(sql)
 
If rst.EOF = False Then
   sino = rst!casado 'El campo CASADO  lo trae asi "FALSO"
   'sino contiene = Falso
End if
 
If sino = "False" then
    MsgbBox "Usted tiene el beneficio"
else
    MsgbBox "Usted tiene el beneficio"
end if
....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Antoni Masana
Val: 1.229
Bronce
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Tipos de datos

Publicado por Antoni Masana (444 intervenciones) el 28/02/2020 20:19:59
Asi sse resuelve con un campo Booleano.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim rst As ADODB.Recordset
Dim sino as Boolean
 
sql = "select casado from usuario where id = "& Text1.Tag &""
set rst = cnn.Execute(sql)
 
If Not rst.EOF  Then
   sino = rst!casado 'El campo CASADO  lo trae asi "FALSO"
   'sino contiene = Falso
End if
 
If Not sino then
    MsgbBox "Usted tiene el beneficio"
else
    MsgbBox "Usted tiene el beneficio"
end if

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Tipos de datos

Publicado por walter (4 intervenciones) el 28/02/2020 20:43:50
Gracias Por su ayuda.
Lo solucioné, pense que era una fonfiguracion de idioma del SQL SERVER, pero funcionó de esa manera.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Tipos de datos

Publicado por Juan Gilberto (323 intervenciones) el 29/02/2020 16:48:56
Al preguntar por el valor de un campo booleano , este no va entre comillas De esa manera estaras preguntando por una string fija
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar