Dentro l'evento dove devi controllare la textbox scrivi:
Codice:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If IsNumeric(TextBox1.Text) = False Then
MessageBox.Show("Solo numeri")
End If
End Sub
Sub text1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles text1.KeyPress
if e.KeyChar>='0' and e.keyChar<='9' then
e.Handled=true
else
e.Handled=false
end if
End Sub
Poi se vuoi permettere l'uso della virgola o del punto decimale, la notazione esponenziale, il segno + o - ecc. aggiungi nell'if le condizioni corrispondenti e setti e.Handled=true per i caratteri che accetti, e.Handled=false per quelli non accettati.