this is my code:
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
tb1 = CType(Me.TextBox1.Text, Integer)
tb2 = CType(Me.TextBox2.Text, Integer)
tb3 = CType(Me.TextBox3.Text, Single)
Catch ex As Exception
MessageBox.Show(ex.Message)...