Visual Basic.NET - Convertir string a double

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.

puedes probar tambien:

RESULTADO = FORMAT(convert.toDecimal(DIAS TRABAJADOS) * convert.toDecimal(MONTO POR DIA), "standard")

Disculpa hice la prueba y tampoco funciono....

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!

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

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

Hola, prueba con val(dias trabajados) * val(monto por dia)
Yo tenia el mismo problema y asi se me solucionó. 1 saludo

Exelente aporte Xuvenco, gracias por compartir tu experiencia, me ayudaste con mi problema :)

Si .. muy buena tu aportación gracias

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)