在一个文本框内输入一段文本，再另一个文本框内输入该段文本中的所有数字字符，并用一个标签框输出数字字符的总个数．
书上是这样写的：
Private Sub Text1_keypress(keypascii As Integer)
Static sum As Integer
If ascii > 46 And keyascii < 58 Then
Text2.Text = Text2.Text & chr(keyascii)
sum = sum + 1
libel1.Caption = "数字字符总数：”&sum"
End If
End Sub

这段程序写在哪个控件内？keypress是什么意思？为什么ascii > 46 And keyascii < 58 是指０－９？chr是什么意思？为什么程序不能执行？