- ベストアンサー
VB.NETとInputManでのプログラミングについて
- VB.NETとInputManを使用してプログラミングをしています。質問者はInputManのNumberで小数点以下3桁を設定したいという問題に直面しています。
- 問題では、MaxValueを99999.999に変更し、MinValueを-99999.999に変更し、さらにFormatを####0.###,,,に変更したとしています。
- 質問者は入力は可能だが、別のNumberでフォーカスが移動すると表示が2桁になってしまうことに関して助言を求めています。
- m-toshi
- お礼率66% (161/243)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
関連するQ&A
- VB初心者。小数点以下の表示でつまづいています(２
『VB初心者。小数点以下の表示でつまづいています(涙』 （・・・過去質問 解決済み） では大変お世話になりました。 さて、上記質問は解決したかに思い、お礼もしてして終了したのですが、 検証しておりましたら問題が見つかりました。 以下、質問内容を修正して、再質問します。よろしくお願いしますm(__)m VB .NET環境 Microsoft Visual Studio / ActiveReportで帳票を作成しています。 DBからの値が、小数点以下ありの場合（例：1.07）の時はそのまま表示し、小数点以下が.00の場合（例：1.00）の時、整数部分のみを表示させたいのです。 質問の『値』ですが、今回の値は小数点第２位までです。 #.00 の時 → # と表示。 #.01～99 の時 → そのまま表示。 としたいのです。 ちなみに、小数点から左（整数部分）の桁は9桁まで入る可能性があります。 前回解決した際は、小数点より右１桁、左１桁で質問してしまったので、 H_数量.Text = Format(Val(H_数量.Text), "0.0") If Right(H_数量.Text, 2) = ".0" Then H_数量.Text = Format(Val(H_数量.Text), "0") End If と回答いただき、このパターンではうまく動きました。 小数点以下２桁のパターンも、コードを変更し、 H_数量.Text = Format(Val(H_数量.Text), "0.00") If Right(H_数量.Text, 2) = ".00" Then H_数量.Text = Format(Val(H_数量.Text), "0") End If でOKでした。 しかし、小数点より左９桁、右２桁を試してみると、ダメなのです。 １行目、 H_数量.Text = Format(Val(H_数量.Text), "0.00") を、 H_数量.Text = Format(Val(H_数量.Text), "#,##0.00") と変更しても、 小数点左が９桁には対応できません。 "###,###,##0" とか、"000,000,000" とか色々試しましたが、 500.00 の時、 000,000,500 と表示されました。 どのようにコードを書いたら良いでしょうか？ アドバイスお願いしますm(__)m
- ベストアンサー
- Visual Basic
- Format関数について
こんにちわ。 単純な質問なのですが、VBで数値をFormatする場合、 "123456" → "123,456" "123456.78" → "123456.78" というように、小数点がない場合は小数点以下は表示されず、 小数点がある場合は小数点以下の表示をする。というような Formatを一行でできないでしょうか？ 小数点は２桁で固定です。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- VB6.0でテキストボックスの書式設定をしたいのですが、
VB6.0でテキストボックスの書式設定をしたいのですが、 以下のコードを入れてみたところ.Formatの部分で、 エラー（メソッドまたはメンバーが見つかりません）がでます。 どう書き直したらよろしいでしょうか？ 教えてください。よろしくお願いします。 数値を小数点2桁まで表示したいです。 Private Sub Text_Change(Index As Integer) For i = 6 To 16 Me.Text(i).Format = "0.00" Next i End Sub
- ベストアンサー
- Visual Basic
- カスタムコントロールInputManのNumberの表示Formatについて
※ 数字と小数点部分は、説明を見やすくするために全角を用いてますが、実際は半角です。 カスタムコントロールInputManのNumberコントロールを Ａ[ ０００００．００] Ｂ[０００００００．００] と上下に並べて、Formに配置しています。 ＡもＢと同じ表示形式であれば、Ｂ同様のプロパティ設定すれば実現できます。 が、、、、Ａの方のみ、以下の仕様で指示されています。 まず、デフォルトでは、小数点以下は表示しないで、[ ０ ]もしくは、[ ０]と表示する。 そして、 "１２３４５"と入力された場合、[ １２３４５ ]と表示する。 "１２３４５．６"と入力された場合、[ １２３４５．６ ]と表示する。 "１２３４５．６７"と入力された場合、[ １２３４５．６７]と表示する。 （右寄せしてしまうのではなく小数点以下部分を表示せずに、Ｂにその桁位置を合わせる） これが、どうしても [ １２３４５]や[ １２３４５．６]ように右寄せとなってしまい、 実現できなくて困っています。 つまり、 Ａ[ １２３４５] Ｂ[１２３４５６７．９１] とか、 Ａ[ １２３４５．６] Ｂ[１２３４５６７．９１] とか、 Ａ[ １２３４５．６７] Ｂ[１２３４５６７．９１] ではなく、 Ａ[ １２３４５ ] Ｂ[１２３４５６７．８９] とか、 Ａ[ １２３４５．６ ] Ｂ[１２３４５６７．８９] とか、 Ａ[ １２３４５．６７] Ｂ[１２３４５６７．８９] となるように表示したいわけです。 このように表示するようにすることって、可能なのでしょうか？ そもそも、カスタムコントロールInputManのNumberコントロールでは無理なことでしょうか？ 別のコントロール（TextBoxなど）を用いると出来ることなのでしょうか？ よろしくお願い致します。
- 締切済み
- Visual Basic
- 丸め処理の対策はどうすれば良い？
ＶＢでプログラムしているのですが 小数点の丸め処理で困っています 対策として よく「Currency型にすれば良い」 というのは 見るのですが Currency型にすると 小数点第４桁までしか あつかえません 小数点第４桁以下 計算の計算も正確に したい場合は どうすれば良いのでしょうか？ 宜しくお願いします
- 締切済み
- その他（プログラミング・開発）
- VB.NETで小数点以下の桁数を取得したい
こんばんは。 VB.NETで1つ教えて下さい。 小数点以下の桁数を取得したいのですが どのようにすると良いのでしょうか？ 例えば 1.5なら1 2.12なら2 2.555なら3と取得したいのです。 解るかたおられましたら ご教授、宜しくお願いします。
- ベストアンサー
- その他(ソフトウェア)
- VB2008で小数点以下３桁を表示しない方法は？
ＶＢ歴１週間となりました。 初めてのVBですがVB2008EEの完成度高さに驚いております。 とても扱いやすかったです。 RS232C通信で外部機器から実数をもらい、計算加工などを行いハイパーテキストに表示するというものです。 大まか完成したのですが、実数の表示がちょっと見にくくなっています。 例） 3333.3333334564 と表示される 3333.3345 とか小数点以下４桁みたいに設定できるでしょうか？ 計算させて丸めれば済む話なのですが、3333.3300 みたいにしたいのです。 意味不明な質問かもしれませんがご理解の程宜しくお願いします。
- ベストアンサー
- Visual Basic
- 小数点以下の数字の桁数表示について
ＶＢ６．０で小数点以下の数値が０の場合でも指定した桁数で０も表示するにはどのようにしたらよいですか？ 例えば、四捨五入のＲＯＵＮＤ（０．１９５０００，４）のとき返ってくる数値が「０．１９５」となり最後の０が表示されません。（以下は４桁表示したいのに） （小数点以下第５位が５なら切り上げで最後に１が表示されますが） エクセルだとセルの書式設定で表示桁数を設定するだけだったのですが。 ＦＩＸＥＤ関数、ＴＥＸＴ関数はＶＢ６．０では使えないのですよね？ ＶＢ６．０に詳しい方よろしくお願いします。お手数です。
- ベストアンサー
- Visual Basic
- EXCEL 小数点以下の桁数を条件によって変えるには
Ｇ列の書式設定を数値、小数点以下０桁に設定してあります Ｄ列にある特定の文字が入力された時だけ、小数点以下の桁数を１桁にしたいのですが、どのようにすればよいでしょうか？ それと小数点以下０桁、１桁の数字の桁位置をそろえることはできますか
- 締切済み
- オフィス系ソフト
お礼
ありがとうございました。見落としていた様です。 お蔭様で解決いたしました。