Example:

1. ' Format Function Example

    

   ' This example shows various uses of the Format function to format values

   ' using both named and user-defined formats. For the date separator (/),

   ' time separator (:), and AM/ PM literal, the actual formatted output

   ' displayed by your system depends on the locale settings on which the code

   ' is running. When times and dates are displayed in the development

   ' environment, the short time and short date formats of the code locale

   ' are used. When displayed by running code, the short time and short date

   ' formats of the system locale are used, which may differ from the code

   ' locale. For this example, English/United States is assumed.

    

   ' MyTime and MyDate are displayed in the development environment using

   ' current system short time and short date settings.

    

   Sub Main()

   1.  

      MyTime = "08:04:23 PM"

      MyDate = "03/03/95"

      MyDate = "January 27, 1993"

       

      MsgBox Now

      MsgBox MyTime

       

      MsgBox Second( MyTime ) & " Seconds"

      MsgBox Minute( MyTime ) & " Minutes"

      MsgBox Hour( MyTime ) & " Hours"

       

      MsgBox Day( MyDate ) & " Days"

      MsgBox Month( MyDate ) & " Months"

      MsgBox Year( MyDate ) & " Years"

       

   End Sub