If Len(Metin1) = 1 Or 2 Or 3 Then
Metin2 = Format(Metin1, "000000")
End If
kodunu silmeniz gerekir. ben bu kodu kimlik alanı için, "15"i "000015" olarak değerlendirmesi için yazdım.
If Len(Metin1) = 1 Or 2 Or 3 Then
Metin2 = Format(Metin1, "000000")
End If