Visual Basic.NET - Convertir string a double

 
Vista:

Convertir string a double

Publicado por Willians (7 intervenciones) el 07/05/2008 15:16:17
Buenos dias, tengo el siguiente problema:

Estoy capturando de una linea de un archivo de texto (separado por comas) los siguientes campos: CEDULA, NOMBRE,APELLIDO,DIAS TRABAJADOS, MONTO POR DIA

Cada campo lo capturo en una matriz de tipo string, pero cuando quiero multiplicar DIAS TRABAJADOS * MONTO POR DIA y cuando el campo MONTO POR DIA viene con decimales utilizando la formula RESULTADO = cdbl(DIAS TRABAJADOS) * cdbl(MONTO POR DIA), el decimal lo toma como un entero.

Ejemplo:

DIAS TRABAJADOS = 13
MONTO POR DIA = 11,5
RESULTADO = 149,5

Utilizando la formula que plantee el resultado lo muestra como 1495

Que función debo utilizar para que este cálculo lo haga correctamente, sabiendo que los campos los capturo como un string.

Gracias por la ayuda que me puedan prestar.
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
sin imagen de perfil

RE:Convertir string a double

Publicado por P. J. (706 intervenciones) el 07/05/2008 17:44:35
puedes probar tambien:

RESULTADO = FORMAT(convert.toDecimal(DIAS TRABAJADOS) * convert.toDecimal(MONTO POR DIA), "standard")
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:Convertir string a double

Publicado por Willians (7 intervenciones) el 07/05/2008 18:53:42
Disculpa hice la prueba y tampoco funciono....
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

RE:Convertir string a double

Publicado por P. J. (706 intervenciones) el 07/05/2008 19:53:57
Viste que los valores convertidos a decimal los tome con los decimales?, porque si en resultado no te muestra con decimal es porque los esta tomando mal.

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:Convertir string a double

Publicado por Alejandra (2 intervenciones) el 29/11/2008 19:59:59
Bueno a mi me pasa lo mismo y lo que hice es por ejemplo tomar 31.23 del cuadro de texto, transformarlo a double res = CDbl(cadena) entonces res=3123 y este resultado dividirlo entre 100 de esta forma te queda res=31.23
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:conv

Publicado por Alejandra (2 intervenciones) el 29/11/2008 20:00:48
Bueno a mi me pasa lo mismo y lo que hice es por ejemplo tomar 31.23 del cuadro de texto, transformarlo a double res = CDbl(cadena) entonces res=3123 y este resultado dividirlo entre 100 de esta forma te queda res=31.23
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:Convertir string a double

Publicado por Xuvenco (2 intervenciones) el 18/12/2008 13:03:55
Hola, prueba con val(dias trabajados) * val(monto por dia)
Yo tenia el mismo problema y asi se me solucionó. 1 saludo
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:Convertir string a double

Publicado por Aracely (1 intervención) el 07/10/2009 18:12:25
Exelente aporte Xuvenco, gracias por compartir tu experiencia, me ayudaste con mi problema :)
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:Convertir string a double

Publicado por Pily (1 intervención) el 16/02/2012 19:05:02
Si .. muy buena tu aportación gracias
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

Convertir string a double

Publicado por Luchito (1 intervención) el 11/03/2013 21:57:52
Yo tenia que calcular en un libro diario la suma del debe y del haber y tenia el mismo problema aqui te envio como me quedo al final:
Private Sub calcular_diferencia()
Dim debe, haber, Tdebe, Thaber As Double
Dim i As Integer
Dim aux1, aux2 As String
txtDebe.Text = ""
txtHaber.Text = ""
Tdebe = Thaber = debe = haber = 0

For i = 0 To libro.Rows.Count - 1
debe = haber = 0
aux1 = (IIf(libro.Item(2, i).Value = "", "0", libro.Item(2, i).Value))
aux2 = (IIf(libro.Item(3, i).Value = "", "0", libro.Item(3, i).Value))
debe = CDbl(aux1.Replace(",", "."))
haber = CDbl(aux2.Replace(",", "."))
Tdebe += debe
Thaber += haber
Next
txtTDebe.Text = Tdebe.ToString.Replace(".", ",")
txtTHaber.Text = Thaber.ToString.Replace(".", ",")
lbDiferencia.Text = FormatNumber(Tdebe - Thaber, 2)
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