Dudu vb6

acho que isso me ajuda, vou tentar algo com esse código e edito aqui o resultado que deu. com uma variável guardando após o acréscimo de 1, por exemplo, "3", o transformo em "003" e jogo logo no pro banco de dados. problemas rídiculos como esse são os que mais dão dor de cabeça... sua solução foi certa, consegui. com o problema resolvido, agora é continuar com o projeto. muito obrigado mesmo pela sua ajuda.

estou com um problema pro seguinte codigo; fazer avançar naturalmente em um codigo com letra, acrescentando de 1 em 1, da seguinte maneira: m001 m002 ... m009 m010 m011 ... e por ae vai tentei o seguinte codigo: '---------------------------------- text1 = m001 text2 = Mid(text1, 2, 3) + 1 text3 = "m" & text2 '---------------------------------- (mudei as variaveis originais pra facilitar a compreensao. caso sirva, tentei assim: (...) indice = Mid(rec1("indice_questao"), 2, 3) + 1 (...) rec1("indice_questao") = Mid(Combo1.Text, 1, 1) & indice (...) onde indice_questao esta guardando m001) só que na soma de "001" + "1" ele da como resposta "2". se ele me retornar "002", o codigo fica certo, mas não sei como fazer isso. caso alguém conheça uma forma mais fácil de fazer isso, ou como fazer que ele me retorne a resposta com os... "zeros à esquerda", ficarei muito grato.