额，谢谢你们！
一楼！谢谢！三楼，你的也运行不了！不知道为什么？改成了和你一样，但是 ，运行时，提示类型不匹配。
请问这是什么原因？
类型不匹配，说明你在 Text1 中没有输入有效的日期。看来你真的需要好好学习，还要动脑。
------解决方案--------------------的自己写，可一行一行增加。就能找到错误。
------解决方案--------------------of123点的够明了.....
------解决方案--------------------文本框Text1.Text里木有日期格式的字符串
