🚀 go-pugleaf

Salve a tutti, ho bisogno di AIUTOOOOOO. Ho l'esigenza di creare 1
applicazione che scriva in un DB access dei numeri continui...lo so,
non è chiaro per niente...ma mi spiego meglio....

Ho 1 form in cui con 2 caselle di testo, l'operatore inserisce 2
numeri ( inizio e fine ) e tramite un bottone, il prog scrive tutti i
numeri un una tabella access...e fin qui, tutto ok...

PROBLEMA.......
l'operatore non deve scrivere ad esempio " 1 " - " 50 " ma " 000001 "
- " 000050 ", quindi io con il codice che riporto di seguito,
incremento fino a 50 e scrivo....ma NON scrivo GIUSTAMENTE le stringhe
comprese di " ZERI " ma sono i numeri.......AIUTATEMI VI PREGO....

Codice :

 .
 .
 .
If rsTab1.EOF Then

           Else
                Do While Not rsTab1.EOF
                       rsTab1.Delete
                       rsTab1.MoveNext
                Loop
           End If


      i = inizio
      Y = finale
      k = 1
      For k = 1 To Y
      rsTab1.AddNew
      If i = Y Then
        Else

       rsTab1("campo1") = i

         rsTab1.Update

        i = i + 1
        End If

        Next
         rsTab1.Update

            MsgBox "DATABASE CARICATO CORRETTAMENTE "


Grazie anticipatamente a TUTTI......

SALUTI