Dim ColValue As object = e.Form.DropDownBox.value 读出来的是空值
其实你做出这个窗口根本不能方便到哪里,比手动输入更浪费时间,直接用系统的日期输入就好了。
如果你实在要这样做,就用MessageBox.show 一步步分析调试吧。