Format関数の定義済み数値書式の使い方を紹介。（MSDNライブラリにも載っています）
[Currency]

通常、Windowsを日本語で使用している場合は頭に￥記号を付加し1000単位の区切り記号も付きます。

使用例：
Dim strPrice As String
Dim lngPrice As Long

lngPrice=19800
strPrice=Format(lngPrice,"Currency")

上記のようにするとstrPriceには ￥19,800 という結果が返ります。

[Fixed]

整数部を最低 1 桁、小数部を最低 2 桁表示する形式で返します。1000 単位の区切り記号は付きません。

使用例：
Dim MyStr As String
MyStr=19800.3256

MyStr=Format(MyStr,"Fixed")
上記のようにするとMyStrには
19800.32 という結果が返ります。

[Standard]

整数部を最低 1 桁、小数部を最低 2 桁表示する形式で返します。
1000 単位の区切り記号が付きます。

使用例：
Dim MyStr As String

MyStr=19800.3256

MyStr=Format(MyStr,"Standard")

上記のようにするとMyStrには19,800.32という結果が返ります。