Mejor haz esto, porque en el ejemplo anterior te ves obligado a saber la longitud de los números.
Código:
Dim variable As String = "19,10000,23,2323223"
Dim x As String()
x = variable.Split(",")
Dim numero1 As Double
Dim numero2 As Double
numero1 = Double.Parse(x(0) & "," & x(1))
numero2 = Double.Parse(x(2) & "," & x(3))
De esta forma cortamos por el caracter separador "," y lo almacenamos en un array de strings. Entonces las dos primeras posiciones serán la parte entera y flotante del primer número y las dos ultimas serán lo mismo del segundo numero.
Saludos.