[2005] how to format as integer

[.paul.]

dim number as integer = ctype(math.round(ctype(TextBox1.Text, decimal)), integer)