菜鸟问题：如何判断文本框内的内容是何种类型？

Question

请问如何用函数判断文本框内的字符串是数字型还是时间类型？用何函数判断，谢谢！！

Answer 1

If IsDate(text1.Text) Then
        '日期型
    Else
        If IsNumeric(text1.Text) Then
            '数字型
        End If
    End If

Answer 2

Private Sub Command1_Click()
    If IsNumeric(Text1.Text) Then
       MsgBox "是数字类型"
    ElseIf IsDate(Text1.Text) Then
       MsgBox "是日期类型"
    Else
       MsgBox "是其它（字符串）类型"
    End If
End Sub'分别测试：Text1内容为："100","2005-12-04","MyText" 的情况