[RESOLVED] [2005] format question

[newpat]

why I set the format to 0000, but it doesn't work?
here is my code

Dim loud As Integer
loud = TextBox1.Text
loud = Format(loud, "0000")
console.writeln(loud)

if my textbox1 is 0123, it just show me 123...