Visual Basic - Ayuda con el Format

Hola a todos!!
Tengo un programa que me lee de un fichero .txt en el que voy leyendo importes de facturas. Normalmente los datos que me vienen son similares a '0000045670'. Lo que yo hago es:
Cdbl(0000045670) / 100 por lo que me devuelve la cantidad 456,70.

El problema que tengo es que unos valores me vienen con sigo menos, es decir:
'0000-23456'. Al hacer la operacion anterior me da el error de que no coinciden los tipos.

¿A alguno se le ocurre alguna solucion a este problema?

Muchisimas gracias por vuestra colaboracion. Besos.

Para esos casos puedes preguntar primero si la expresión tiene un signo menos y en ese caso cortarla a partir de ese signo:

If InStr("0000-23456","-")>0 Then
Val(Mid("0000-23456",InStr("0000-23456","-")))/100
End If

La respuesta de Cecilia me parece buena, pero te voy a dar otra idea, quiza tu problema no esta en la operacion matematica que haces, quiza esta en la variable que recibe el resultado de la operacion matematica, quiza esa variable de un tipo que no admite negativos. Espero que esto te ayude.

¿Qué es eso de? :
"quiza esta en la variable que recibe el resultado de la operacion matematica, quiza esa variable de un tipo que no admite negativos. Espero que esto te ayude. "
Sí, ayudará a confundir. Está claro que aquí cada uno contesta lo que le dá la gana sin saber lo que está diciendo.