Visual Basic - Reconocimiento de variables

Life is soft - evento anual de software empresarial
   
Vista:

Reconocimiento de variables

Publicado por John Alexander Rodriguez (1 intervención) el 10/09/2007 19:23:17
Estoy trabajando en un proyecto sencillo de fraccionarios. Recibo un número en un texbox y lo asigno a una variable que es interger o entera. Si el usuario me ingresa un número decimal el programa debe rechazarlo pero si es entero debe admitirlo. ¿Me pueden decir si hay alguna sentencia que me permita diferenciar entre un número entero y un decimal o un metodo para hacerlo?
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

RE:Reconocimiento de variables

Publicado por P. J. (173 intervenciones) el 10/09/2007 19:42:59
Esto te puede ayudar:

Private Sub Command1_Click()
If InStr(1, Me.Text1.Text, ".") Or InStr(1, Me.Text1.Text, ",") Then
MsgBox "decimal"
Else
MsgBox "entero"
End If
End Sub

Suerte!
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

RE:Reconocimiento de variables

Publicado por Alex (54 intervenciones) el 10/09/2007 19:50:21
ya.. y si en el Me.Text1.Text pongo

1256,00
ó
1.256 (mil doscientos cincuenta y seis en castellano)

me va a decir que es entero, o decimal??

como toda la ayuda que des sea como esa... vamos apañados!
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

Y tu aporte

Publicado por P. J. (173 intervenciones) el 10/09/2007 20:19:38
" 1.256 (mil doscientos cincuenta y seis en castellano) "

¿?, de onde eres, que feo tu castellano. Al menos yo se desde HACE TIEMPOOOO que ya no se hace eso, sino separar con espacios, algunos usan ' en cifras grandes.

Pero bueno, si sabes bastante aporta no te cuesta nada, o eres uno de esos que se fijan como escribe uno y criticar, anda busca una vida mejor. :D
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

Mi aporte es no contestar burradas

Publicado por Alex (54 intervenciones) el 10/09/2007 22:01:14
cuando no sé una respuesta, pues no contesto... así de sencillo.
no estoy en una maratón ni tengo que demostrar nada y si no entiendes lo que significa mil doscientos cincuenta y seis en castellano es que en tu vida has visto un diccionario (te recomiendo el de la RAE que es el oficial) o eres indio.

y al menos tu se desde HACE TIEMPOOOO ya no se hace eso, sino separar con espacios ????

algunos usan ' en cifras grandes????

no crees que lo estás complicando cada vez mas???
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

Mejor sigue haciéndote tus pajas

Publicado por Ivan (1041 intervenciones) el 10/09/2007 22:28:17
¿No contestar burradas?
Pues eso que escribiste ¿cómo lo catalogas, pajosín?
Por cierto ¿te agradeció Brenda tu "caballerosidad", o quisiste ligarla para dejar tu vicio?
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

RE:Reconocimiento de variables

Publicado por Carlos (12 intervenciones) el 10/09/2007 20:56:52
Bueno yo haria lo siguiente para no tener error con los separadores de mil

Private Sub Command1_Click()
Dim resto as Double
resto=FormatNumber( Me.Text1.Text,2)-FormatNumber( Me.Text1.Text,0)
If resto <> 0 Then
MsgBox "decimal"
Else
MsgBox "entero"
End If
End Sub
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