在分配DateValue时键入不匹配

Question

这是我的代码：

Dim LFile As Date
LFile = DateValue("Jun 19, 2000")

抛出“运行时错误'13'：类型不匹配”

Answer 1

如上所述，您的特定系统上的DateValue功能及其当前的区域设置无法将"Jun 19, 2000"识别为有效日期。

要检查可能识别的内容，请在即时窗口中输入Msgbox Format(36696,"mmm dd, yyyy")。对于该语言环境，"mmm dd, yyyy"根本不被视为有效（在这种情况下，它可能无法正确显示日期），或者Jun部分可能不是该语言中第6个月的有效3个字符表示形式（在这种情况下，它应该告诉你第6个月你应该使用哪些字符。）

为了更好的兼容性，DateValue（＆＃34; 2000-06-19＆＃34;）应该被（我想象）所有Locale设置识别。