Visual Basic - Ayuda Urgente

Saben estoy haciendo un programa que extrae un campo de una tabla para luego enviarlo a un archivo txt, todo funciona bien lo hise de esta forma:

Cuenta = Mid(DNumeroDeCuenta & Space(16), 1, 16)
DImporte = rstSantanderQuincena.Fields("CantidadTotal").Value 'Verificar Importe
Importe = Format(DImporte, "0000000000000000.0000")
EnterosCeros = Mid(Importe, 1, 16)
Enteros = Format(EnterosCeros, "############0000")
Decimales = Mid(Importe, 18, 2)
EnterosDecimales = Mid(Enteros & Decimales & Space(18), 1, 18)
sSQL3 = Cuenta & EnterosDecimales

como se daran cuenta la variable"Cuenta" ocupa un espacio de 16 caracteres dentro de mi txt, ahora bien lo que me hace fala es que mi variable EnterosDecimales tambien tenga un espacio de 18 como se lo indique al final pero alineado a la derecha de esos 18 espacios por ejemplo asi

5342556645354324##########34654234

y no asi

534255664535432434654234##########

no se si haya alguna forma de decile alineate a la derecha y no que se escriba inmediatamente despues de mi variable Cuenta espero me puedan ayudar ya no se que mas hacer GRACIASSS.

Podrías probar con una operacion como esta

EnterosDecimales = Space((18 - Len(Enteros & Decimales))) & Enteros & Decimales

De esta manera siempre te va a devolver el número que vos determines alineado a la derecha

Te lo agradezco muchisimo !!!!