主题：编缉框中只允许输入数据，请教如何处理

老师：我在编缉框中，textchanged 事件中写入如下：

Dim txt As String = e.Form.Controls("Text附件张数").text
If not  Char.IsDigit(txt) Then
    e.Form.Controls("Text附件张数").text = Nothing
End If
出现“应用程序出现无法处理的异常” 如上传附件所示。

我想达到的目的是，编缉框中只允许输入数据，请教如何处理？