摘要:
Public Sub EditInterval_KeyPress(KeyAscii As Integer)If ((KeyAscii >= 48) And (KeyAscii <= 57)) Or (KeyAscii = 46) Or (KeyAscii = 8) Then ElseKeyAscii = 0 Exit SubEnd IfEnd SubPublic Sub EditWarning_Click()End SubPublic Sub EditWarning_KeyPress(KeyAscii As Integer)If ((KeyAscii >= 48) And ( 阅读全文
posted @ 2012-04-11 18:27 ╰★张志峰★╮ 阅读(473) 评论(0) 推荐(0) 编辑