書式設定

[popo]

単純な質問ですいません。
お手数をかけますがお教えください。

小数点第３位まで表示を行うには、どのようにすれば良いのでしょうか。
(VBならFormatで指定すれば良いのですが・・）

よろしくお願いします。

[NoWest]

> 単純な質問ですいません。
> お手数をかけますがお教えください。
>
> 小数点第３位まで表示を行うには、どのようにすれば良いのでしょうか。
> (VBならFormatで指定すれば良いのですが・・）
>
> よろしくお願いします。

どのような場面で使うのか分かりませんがStr$関数を使っとけば
PrintだろうがMessageBoxだろうが表示できますのでご紹介しておきます。

四捨五入を考慮

コード: 全て選択

Dim str As String
Dim num As Double
num=1.23456789
str=Str$(Int(num*1000+0.5)/1000)

四捨五入を無視

コード: 全て選択

Dim str As String
Dim num As Double
num=1.23456789
str=Str$(Int(num*1000)/1000)

同様の質問は過去にもあったと思いますので
掲示板の過去ログをダウンロードして調べてみると色々と情報があると思います。