Visual Basic - AYUDENME MIS AMORES!!!

Life is soft - evento anual de software empresarial
 
Vista:

AYUDENME MIS AMORES!!!

Publicado por Lucy (1 intervención) el 23/06/2005 17:06:19
un beso para todos, lo q les pido es por favor me puedan ayudar...

si alguien tiene el codigo para realizar operaciones matemáticas completas ( q me den como resultado en un textbox : decimales..... sin redondear)

yo tengo el codigo basico pero no me es suficiente, si alguien tiene algo mas complejo porfavor se los agradecería.

un ejem...

text1 = tex2 * text3...... donde text2=5.67 y text3=130.24, el text1 me sale 738, es decir me lo redondea a menor. que hago?????????????
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:AYUDENME MIS AMORES!!!

Publicado por gon (46 intervenciones) el 23/06/2005 18:18:56
lo que tenes que hacer es reemplazar el punto por la coma ej

text3 = replace(text1,".",",") * replace(text2,".",",")

o en el keypress de cada textbox invalidas el punto y obligas a poner coma

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 46 Then KeyAscii = 44
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 46 Then KeyAscii = 44
End Sub

Private Sub Command1_Click()
Text3.Text = Text1.Text * Text2.Text
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
sin imagen de perfil
Val: 14
Ha aumentado su posición en 8 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:AYUDENME MIS AMORES!!!

Publicado por SuNcO (600 intervenciones) el 23/06/2005 18:56:23
A mi si me regresa 738.4608

Private Sub Command1_Click()
Text1 = Text2 * Text3
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

RE:AYUDENME MIS AMORES!!!

Publicado por Frank (5 intervenciones) el 23/06/2005 19:33:51
Amor prueba con este codigo

text1.text=format( cstr(cdbl(text2.text) * cdbl(text3.text)) ,"###,###.000")

pero donde me daras el besitoooooooooooooo

Frank
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:AYUDENME MIS AMORES!!!

Publicado por lucy (2 intervenciones) el 23/06/2005 19:42:00
Frank que el besito te lo de tu mama en donde tu quieras, o si no te jalas la tripa tu solo
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:AYUDENME MIS AMORES!!!

Publicado por Luis Pelicó (3 intervenciones) el 01/07/2005 08:03:05
Mira, lo primero que debes hacer es darle formato a tu cuadro de texto para que solo te acepte 2 decimales y te permita usar el punto para separacion de cantidades y luego cuando esta realizado cualquier operación matemática, deber convertir el contenido del cuadro de texto a valor numérico.

por ejemplo

var = val(text1.text ) * val(text2.text)

La funcion VAL te convierte el contenido del cuadro de texto a valor numérico.

espero te sirva de algo, adios cielito...
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:AYUDENME MIS AMORES!!!

Publicado por Jesusin (15 intervenciones) el 01/07/2005 12:02:15
Lo mejor para realizar este tipo de operaciones es crear variables:

Dim resulatdo as double
resultado = text1 * text2
text3=resultado
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:AYUDENME MIS AMORES!!!

Publicado por lucy (2 intervenciones) el 01/07/2005 16:49:31
Luis pelico y Jesusin jalense la tripa los dos,, mañosos
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:AYUDENME MIS AMORES!!!

Publicado por LUCIFERRRR (1 intervención) el 02/07/2005 00:13:11
HOLA LUCY:

PORQUE ERES TAN CACHONDA? AYUDENME MIS AMORES!!!! PARECE GEMIDO DE UNA SOBERANA PUTA... PORQUE NO CONSULTAS COMO UNA MUJER NORMAL ESTÚPIDA????

SI TE GUSTA JUGAR EL JUEGO, LUEGO AGUANTA EL CIPOTE QUE TE PUEDE VENIR POR CUALQUIER LUGAR

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