主题：怎么判断输入的是不是日期格式？（已ok）

Dim d As Date '变量d用于存储转换结果
If Date.TryParse("1999/12/31", d) Then '如果转换成功
    Output.Show(d) '输出转换结果
Else
    Output.Show("无效日期格式") '给出错误提示
End If