谁能帮我解释一下这段代码，希望仔细一点

private sub text1_keypress(K as integer )

if K<asc("0") or k>asc("9") then

K=0

else

label1.caption=chr(K)=label1.caption

end if

end sub

private sub text1_keypress(K as integer ) '定义一个方法，参数类型为integer

if K<asc("0") or k>asc("9") then ‘如果K小于0的asc码或者K大于9的asc码 那么k=0
K=0

else

label1.caption=chr(K)=label1.caption '否则label1的值为空。

end if '结束条件

end sub '结束方法

当用户在TextBox 里面按下或松开键盘上的某个按键时，发生KeyPress事件，K<asc("0") or k>asc("9") 是在 TextBox 中限制输入数字，过滤0~9以外的字符