Preciso, acrescentar um digito, no caso de o usario digitar apenas 03 digitos, por exemplo se o mesmo digitar, 620(para informar q sao seis horas e vinte minutos preciso acrescentar um zero,informando q são 0620.neste caso não irei utilizar caracteres especias para separar os digitos

    Dim sData As String
    sData = Format("620", "0000")
    MsgBox sData