Home > Available Help Files > PC-DMIS BASIC Language > Language Reference A – Z > IsDate Function > Example - IsDate Function
Current Help File: PC-DMIS Basic (View Core Help)
Example - IsDate Function
Sub Main Dim MyVar1 As Integer, MyVar2, MyCheck1, MyCheck2 MyVar1 = 345 MyVar2 = "January 1, 1987" MyCheck1 = IsDate(MyVar) MyCheck2 = IsDate(MyVar2) MsgBox "Is this a date? " & MyVar1 & Chr(10) & MyCheck1 MsgBox "Is this a date? " & MyVar2 & Chr(10) & MyCheck2 End Sub