Visual Basic - eliminar palabra despues de punto

hola.tengo este texto:
a="respaldo de un pronostico.mdb" dicho texto viene por defecto ya con el .mdb. necesito quitarle el texto luego del .mdb.como hago pa q quede solo as:
a="respaldo de un pronostico"

gracias por su ayuda colegas..........
haydee

a = Left(a, InStrRev(a, ".", , vbTextCompare) - 1)

De nada! nena.

dios!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!eres un genio

gracias miles.....................

dios!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!eres un genio

gracias miles.....................y feliz navidad

dios!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!eres un genio

gracias miles.....................y feliz navidad

Bueno, aunque ya te respondienron, otra manera sería:

a = replace( a, ".mdb", space(0) )