VB6 Tutorial 35: Formatting Functions

Posted On 2018-04-20 by VB6Boy
Tags: VB6 Tutorials 
Views: 44

Looking for the more of the VB6 Tutorial? Here is the tutorial index.

This lesson will take you through the formatting functions in Visual Basic 6 which you can use to format numeric or string expressions.

You have probably seen in many applications that you enter a number and that number is displayed in a different format for a better readability. Formatting functions are useful when you want to represent an expression in many different ways. For instance, you may want to convert an expression to currency format, phone number format, credit card number format or percentage format. Sometimes its necessary to represent the date-time values in a couple of ways. Visual Basic 6.0 has included many powerful functions in order to achieve this.


The FormatNumber function converts an expression to the numeric format.


Print FormatNumber(2234.789, 2)

Output: 2234.79


The FormatCurrency function converts an expression to the currency format.


Print FormatCurrency(2234.789,2)

Output: $2234.79


The FormatPercent function converts the expression to the percentage format.


Print FormatPercent(.225, 2)

Output: 22.50 %

Displaying current Date/Time

Before showing you formatting date-time values, lets see how to display date and time. Remember that Time and Date are properties, not functions in the following example.

Private Sub cmdShowDateTime_Click()
     'Displays current time
     Print Time             '12:53:12 PM

     'Displays current date
     Print Date             '04-09-2012

     'Displays current date,time
     Print Now              '04-09-2012  12:53:12 PM
End Sub


The FormatDateTime function displays a date/time value in different formats.


Print FormatDateTime("2 - 3 -2012", vbLongDate)
Print FormatDateTime(Now, vbLongDate)
Print FormatDateTime(Time, vbShortTime)    'Displays current time
Print FormatDateTime(Time, vbLongTime)


02 March 2012
04 September 2012
12:03:28 PM


The Format function is the most useful among all the formatting functions in the sense that it can be used to perform many formatting tasks. You can use this function to format date-time values, phone number or credit card number, currency and many others.


Print Format(8765, "@@@@@@@")

Output: 8765

Three spaces before 8765.

You can use the Format function to format different types of expressions. The below example shows this.


Print Format("abc", "@@@@@@@@@")            ' abc

Converts into currency form

Print Format(123, "Currency")               ' $123

Converts into uppercase

Print Format("xyz", ">&&&")                 ' XYZ

Converts into lowercase

Print Format("HELLO", "<&&&&&")             ' hello

Converts into phone number or credit card no. form

Print Format(9845678972#, "&&&&-&&-&&&&")   ' 9845-67-8972

Short Time

Print Format(Now, "hh:mm")                  ' 12:38

Print Format(Now, "hh:mm:ss")               ' 12:38:00

Print Format(Now, "hh:mm AMPM")             ' 12:38 PM

Print Format(Date, "dddd mmm dd, yyyy")     ' Tuesday September 04, 2012

Print Format(Date, "dd mmmm")               ' 04 September

Looking for the more of the VB6 Tutorial? Here is the tutorial index.

About the Author

has posted a total of 78 articles.

Comments On This Post

No comments on this post yet!

Do you have a thought relating to this post? You can post your comment here. If you have an unrelated question, you can use the Q&A section to ask it.

Or you can drop a note to the administrators if you're not sure where you should post.

Your IP address is:

Before you can post, you need to prove you are human. If you log in, this test goes away.

Code Links