PC-DMIS Help Center - 2022.1
Click here to see this page in full context

Example - DateValue Function

  1. Sub Main ()

    1. Dim v As Variant

      Dim d As Double

      d = Now

      Print d

      v = DateValue("1959/05/29")

      MsgBox (VarType(v))

      MsgBox (v)

    End Sub