Visual Basic - Mascara en un Rut

Hola atodos los colaboradores, tengo un rut y necesito darle una mascara debido a que ya se encuentra almacenado sin dicha mascara
en la tabla se encuentra asi : 03609780-k y cuando lo quiero extrar de la tabla deberia quedar de esta Forma : 03.609.780-k cualquier ayuda se agradece gracias

Hola, creo que deberias utilizar el Control MaskedEdit, el te permite crear tu propia mascara ejemplo, seria:

##.###.###-A , los gatos indican que son solo numeros y la letra un caracter alfanumerico....si tienes dudas escribeme...

CXhauuuu Suerte desde Chile

Hola
Creo que esto sirve no es lo mas apropiado pero para salir del paso sirve
Text1 = rsmaepersonal("rutempleado")
ini = Mid(rsmaepersonal("rutempleado"), 1, 1)
dig = Mid(rsmaepersonal("rutempleado"), 10)
rut = Mid(rsmaepersonal("rutempleado"), 2, 7)
Text1 = ini & Format(rut, "000,000") & "-" & dig
Chao