asignar el contenido de un texbox
 

necesito asignar el contenido de un textbox a una variable de tipo entero

ejemplo

dim a as integer

a = tx1.text

por favor como hago esto me genera este error

Input string was not in a correct format

prueba

Dim A As Int = Cint(Tx1.Text)

no funciona