文本框一个,在属性面板中设置 "格式"为合适的日期格式
然后设置它的键按下事件
Private Sub d交货日期_KeyDown(KeyCode As Integer, Shift As Integer) KeyCode = 0 End Sub
这样做的目的是防止用户输入不合法或者错误的日期,比如留空,比如输入abc,避免提交时的复杂检验过程.