[VB6] Inserire un carattere in una stringa

[camparino75]

Ciao a tutti volevo sapere se si poteva inserire un carattere in una stringa, per rendere le due strghe in maniera uniforme, ovvero
se ho un prima stringa composta dal numero 24 e una seconda stringa composta dal numero 346 vorrei che fossero entrambe da 5 caratteri; qundi nella priva vorrei che diventi xxx24 e la seconda xx346.

in poche parola se ci sta un'istruzione in vb6 equivalenta lpad(ID,5,'X') in sql

grazie mille a tutti

[oregon]

Se ti bastano degli zeri iniziali puoi scrivere

Print Format(24, "00000")

[camparino75]

Ti ringrazio per la risposta, se invece degli zeri vorrei inserire un carattere, come ad esempio una 'X', il comando è lo stesso

[Luciano79]

Function lpad(Numero As Integer, Lunghezza As Integer, Carattere As String) As String
    If Lunghezza >= Len(CStr(Numero) Then
        lpad = String(Lunghezza - Len(CStr(Numero)), Carattere) & Numero
    Else
        lpad = ""
    End If
End Function

....
Sub Main
    Dim ID As Integer
    ID = 24
    MsgBox lpad(ID, 5, "X")
End Sub

[camparino75]

grazie mille per il suggerimento, lo metto subito in pratica nel mio codice
a presto...