Como validar datos ingresados en Visual Basic

¿Este es mi codigo de visual basic se trata sobre suma de matrices podrian decirme como validar los datos ingresados? Es decir cuando ingrese una letra o no se ingrese nada aparezca un mensaje que diga "debe ingresar un numero"

Dim matA(,), matB(,) As Integer
Dim a, b, c, d, i, j As Integer
a = 4
b = 4
c = 4
d = 4

ReDim matA(a, b)
ReDim matB(c, d)
MessageBox.Show("INGRESE LOS NUMEROS DE LA MATRIZ A")
For i = 0 To a - 1
For j = 0 To b - 1

matA(i, j) = InputBox("INGRESE UN NUMERO")&& If
matA(i, j)<>"" Then
Next
Next
MessageBox.Show("INGRESE LOS NUMEROS DE LA MATRIZ B")
For i = 0 To a - 1
For j = 0 To b - 1
matB(i, j) = InputBox("INGRESE UN NUMERO")
Next
Next
For i = 0 To a - 1
For j = 0 To b - 1
If i = 0 Then
TextBox1.AppendText(matA(i, j) & " " & ControlChars.NullChar)
End If
If i > 0 Then
If j = 0 Then
TextBox1.AppendText(ControlChars.CrLf)
End If
TextBox1.AppendText(matA(i, j) & " " & ControlChars.NullChar)
End If
Next
Next

For i = 0 To c - 1
For j = 0 To d - 1
If i = 0 Then
TextBox2.AppendText(matB(i, j) & " " & ControlChars.NullChar)
End If
If i > 0 Then
If j = 0 Then
TextBox2.AppendText(ControlChars.CrLf)
End If
TextBox2.AppendText(matB(i, j) & " " & ControlChars.NullChar)
End If
Next
Next

For i = 0 To a - 1
For j = 0 To b - 1
If i = 0 Then
TextBox3.AppendText(matA(i, j) + matB(i, j) & " " & ControlChars.NullChar)
End If
If i > 0 Then
If j = 0 Then
TextBox3.AppendText(ControlChars.CrLf)
End If
TextBox3.AppendText(matA(i, j) + matB(i, j) & " " & ControlChars.NullChar)
End If
Next
Next

Añade tu respuesta

Haz clic para o