用ASCII码好一点的！不用那么自费繁锁的！

版主，能详细说清楚是如何解决。如：
Private Sub Text1_Change()

End Sub
中间添加？

不是改變事件而是鍵盤按下事件
private sub text1_keypress()
    If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii <> 8 And KeyAscii <> 46 Then
        KeyAscii = 0
    End If
end sub





[[it] 本帖最后由 jxyga111 于 2008-6-2 17:04 编辑 [/it]]

[[it] 本帖最后由 jxyga111 于 2008-6-5 08:58 编辑 [/it]]

谢了，我还有个问题请教，如何将时间做为查询条件，现用dtpicker控件做为时间的选择，但如何使它捆绑

[[it] 本帖最后由 jxawgyl 于 2008-6-2 14:11 编辑 [/it]]

where aa=dtpicker1.value

告訴大家只要看ASCII碼就行了
謝謝各各樓上的

[[it] 本帖最后由 jxyga111 于 2008-6-5 16:44 编辑 [/it]]