visual basic.ne te tip dönüşümleri

Dim Sayi1 As Integer
Dim Sayi2 As Integer
Dim Toplam As Integer

If IsNumeric(TextBox1.Text) Then
Sayi1 = CInt(TextBox1.Text)
Else
MessageBox.Show(“TextBox1 sayıya dönüştürülemiyor”)
TextBox1.Focus()
TextBox1.SelectAll()
Exit Sub
End If

If IsNumeric(TextBox2.Text) Then
Sayi2 = CInt(TextBox2.Text)
Else
MessageBox.Show(“TextBox2 sayıya dönüştürülemiyor”)
TextBox2.Focus()
TextBox2.SelectAll()
Exit Sub
End If

Toplam = Sayi1 + Sayi2
Label3.Text = CStr(Toplam)