Per essere più chiaro:
Dim i As Int32
i = Convert.ToInt32(TextBox1.Text)