You can't do that with numbers - the number of leading zeros doesn't matter because they are always ignored.
You can do it when you format a number into a string for display however:
Dim val As Integer = 123
Dim formatted As String = val.ToString("D4")
Console.WriteLine("{0:D4}", val)
Will both produce "0123"