VB.net Formatについて

TextBox1.Text = Format(CInt(TextBox1.Text), "#,###,##0.00")

VB.netではTextBox1に35.5と入れて上のコードを実行すると36.00になるのですが、

VB6では35.50になります。

調べてみるとVB.netとVB6でFormat関数に変更があったみたいなのですがどうしたらいいのかわかりません。

35.50と表示されるようにしたいのですがどう書けばいいのでしょうか？教えてくださいm(__)m

行動規範の内容に同意します

回答1件

ベストアンサー

VB6とVB.NETでどう変わったかまではちょっと詳しくないので説明できませんが、質問者さんが書かれているコードだと36.0になるのは当然ではないかと思います。というのはCInt関数を使ってTextBox1.Textの値を整数値に変換してからFormat関数に渡しているからです。

MSDNによるとCInt関数を使うと小数部分に丸めが発生して最も近い偶数に値を丸める、とのことなのでこの場合35.5が36になりますが、34.5だと34になるようです。

まずは

VB.NET
1TextBox1.Text = Format(CInt(TextBox1.Text), "#,###,##0.00")
2 ↓
3TextBox1.Text = Format(TextBox1.Text, "#,###,##0.00")

と変更してみてください。ご希望の結果になるはすです。

投稿2016/01/16 05:57

総合スコア3041

2016/01/16 06:18

なるほど、formatではなくCIntのほうに問題がありましたか・・・わかりました、ありがとうございますm(__)m

行動規範の内容に同意します

あなたの回答

tips

プレビュー

行動規範の内容に同意します

質問の解決につながる回答をしましょう。サンプルコードなど、より具体的な説明があると質問者の理解の助けになります。また、読む側のことを考えた、分かりやすい文章を心がけましょう。

15分調べてもわからないことは
teratailで質問しよう！

ただいまの回答率
85.25%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる