数値変換

解決

涙サ 2007-08-01 03:43:57 No: 99251

ネット上から取得した、数字変換可能文字列を
Valで変換したんですが、小数点いかが切り捨てられてしまいます。
小数点以下まで表示させるにはどうしたらよいのでしょうか？

例
お金 = Val(92.115)
カーソルを当てるとお金の中が92で変換されてしまう。

wae 2007-08-01 04:12:36 No: 99252

Private Sub Command1_Click()

Dim お金 As Double

お金 = Val(92.115)
Text1.Text = お金

End Sub

これを実行してみて下さい。

涙サ 2007-08-01 04:56:20 No: 99253

すいません。
言い忘れていました。
変数をDoubleにしても切捨てられるようなんですが？
↑上の奴なんですが
テキストボックスにいれるのにお金が値型じゃだめじゃないんでしょうか？

KG 2007-08-01 06:56:34 No: 99254

私の環境(win2k,vb6sp6)では再現しませんが、

お金 = Val(92.115)
Debug.Print お金

これだけのプロジェクトを新規作成してみても
92となりますか？

wae 2007-08-01 07:45:23 No: 99255

>テキストボックスにいれるのにお金が値型じゃだめじゃないんでしょうか？
よくわかりませんが、値型でも参照型でも代入できると思います。
VB5では↑のプログラムはテキストボックスに「92.115」と表示されます。
ひょっとして.NETですか?
(もしそうでしたら.NETはわかりませんので、他の方回答お願いします。)

かさのば 2007-08-01 08:42:00 No: 99256

というか.NETなら板違いなので
http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi
か
http://madia.world.coocan.jp/cgi-bin/vbnet/wwwlng.cgi
へ行かれたほうが良いと思います。

ちなみにC#で試してみましたが再現しませんでした。

かさのば 2007-08-01 11:12:28 No: 99257

.NET掲示板へ移行したようです。
http://madia.world.coocan.jp/cgi-bin/vbnet/wwwlng.cgi?print+200708/07080001.txt

涙サ 2007-08-01 12:45:39 No: 99258

お騒がせしました。
解決を押すのを忘れていました。
見事解決しました。