• ベストアンサー

小数点前の桁揃え

最近大学でVB.NETを勉強し始め色々やってみているのですが テキストを見ると 123.456 12.345 このように小数点の位置が揃っていなくて非常に気になるのです それなので 123.456 -12.345(-はスペース) このように揃える事はできないでしょうか。 よろしくお願いします。 あと、VB.NET関係で勉強になるHPなどがありましたら教えてください

質問者が選んだベストアンサー

  • ベストアンサー
  • ftomo100
  • ベストアンサー率41% (297/723)
回答No.1

format関数がそれにあたります。 format(引数,フォーマット)の戻り値が桁数が揃います。 http://www.bcap.co.jp/hanafusa/VBHLP/HLPitiran.htm http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd/sak3doc.htm

TpyLgW
質問者

お礼

ありがとうございます 教えていただいたHPを参考にして TextBox11.Text &= z1 & vbTab & Microsoft.VisualBasic.Right(Space(10) + Format(w1, "#0.######0"), 10) & vbCrLf TextBox11.Text &= z2 & vbTab & Microsoft.VisualBasic.Right(Space(10) + Format(w2, "#0.######0"), 10) & vbCrLf TextBox11.Text &= z3 & vbTab & Microsoft.VisualBasic.Right(Space(10) + Format(w3, "#0.######0"), 10) & vbCrLf このように書いてみたのですがまだ半角文字の半分ぐらいずれてしまいます。 これ以上きれいに揃える事はできるのでしょうか

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • ftomo100
  • ベストアンサー率41% (297/723)
回答No.2

ずれるのは右ですか左ですか? [左] 等角フォントを使ってますか? [右] テキストボックスずれてないですか?

TpyLgW
質問者

お礼

ありがとうございました 左にずれていたので全体のフォントをMSゴシックに変更したところ きちんと桁が合って表示されるようになりました 本当にありがとうございました

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • 小数か整数かを判定する方法

    お世話になります。 ただいま、VB6で悩んでいる事があり質問させていただきに参りました。 1: あるテキストボックスがあり、それには数字のみ入力するのですが、 小数が入力された場合、小数点第1位までしか入力させない、または小数点第2位以下が入力されていた場合、エラーメッセージ表示という処理をしたいのです。 例えば、1.5という文字の入力はOKですが、1.55と入力された場合は、エラーメッセージを表示。 2: 上記のテキストボックスに整数が入力されていたら、Format関数で、"00000"というカタチにして、小数が入力されていたら、"000.0"というカタチにしたいのです。 整数か?小数か?という判定方法が分からず困っています。 熟練者の方々にはとても簡単な事かもしれませんが・・・。 ご教授の程、どうかよろしくお願いします。

  • Q.Xを小数点以下の各けたの値が2か3か4であるような小数全体の集合と

    Q.Xを小数点以下の各けたの値が2か3か4であるような小数全体の集合とするとき、|X|>アレフゼロを証明せよ。 以下、ネットでのどなたかの回答を参考に、私なりにテキストを読み返すなどして解釈して、作成しました。 テスト問題としての解答として、 「修正および補足」などをお願いします。 A. |X|=アレフゼロと仮定すると、|X|=アレフゼロ=|N|よりNからXへの全単射が存在する。 1→α_1∈X 2→α_2∈X ・・・・・・・・・ n→α_n∈X ・・・・・・・・・ 実数βの小数点第i位を以下のように定める α_iの小数点第i位が2,4のとき βの小数点第i位は3 α_iの小数点第i位が3のとき βの小数点第i位は2 よって実数βは、β∈Xであるが、α_1,・・・,α_n,・・・のいずれとも異なる。 したがって、仮定は矛盾しているので、|X|≠アレフゼロとなる。 また、|P|<アレフゼロならば、Pは有限集合となり矛盾。 以上により、|P|>アレフゼロとなる。

  • 小数点⇔n進数のやり方

    いつもお世話になっております。 早速ですが、VB2008にて小数点⇔n進数のやり方がわからず困っています。 16進数 404ccccd 10進数 1078774989 2進数 1000000010011001100110011001101 小数点に変換すると3.2になるはずですが、やり方がわかりません。 CONVERTやbitconverter等試してみたのですがうまくいきません。 ネットで検索し、小数点からn進数は見つけたのですが、逆の方法が見つかりません。 逆演算すればとも思ったのですが、いまいちうまくいかず質問させていただきました。 宜しくお願いいたします。

  • ACCESSで小数点以下の表示を制限する

    こんにちは。 ACCESS2003を使っています。 フォーム上で、テーブルの特定の項目(単精度浮動小数点型)を、小数点以下2桁まで表示させています。 この項目は事前に小数点以下3桁目を四捨五入しています。 そしてテーブルの定義で少数点以下2桁まで表示させています。 確かにそのとおり表示されるのですが、そのテキストボックスにカーソルを位置付けると小数点以下10桁以上の小さな数字が表示されてしまいます。 1.これは誤差として避ける事ができないのでしょうか? 2. カーソルを位置づけた時、指定桁数以下を表示させないようにはできないでしょうか?

  • 小数点以下の検知

    とつぜん失礼します。VB.Netを使用しています。 計算結果が小数点以下 たとえば"25.6"だった場合10倍して整数化する プログラムを書きたいのですが、調べてもわかりません。 すみませんが誰かお教えください。

  • 小数点の位置について

    お世話になります。 現在、電磁理論という本で勉強しているのですが、 ものすごく基本的なことがわかりません。 ある問題を解いたのですが、 私の答えが 108 x 10^5 だったのに対し、本の答えは 10.8 x 10^6 でした。 また、本文には(上記の問題とは関係なし)、 「1個の電子は1.602 x 10^19クーロンの~」 とありました。 小数点の位置はどうやって決まるのでしょうか? どうぞよろしくお願いいたします。

  • そろばん 両落とし 小数×小数

    今大学生の者です。 そろばんのかけ算の両落とし(上からかけ、かつ定位点に合わせる方法)を近所の先生に教わりました。 整数×整数(例:56,893×298,641)や帯小数を含むもの(例:58.239×146,834、58.239×146.834)はできるようになりました。 しかし、純小数同士のもの(例:0.258×0.003621)はどの位置から計算すればいいのか分からず、この類に限り片落としでやっております。 せっかく教えていただいたのでどのような問題でも(時間節約のためにも)全ての問題を両落としでやりたいです。 いい方法をご存じの方、いらっしゃいましたらよろしくお願い致します。

  • VB.NETで小数点以下の桁数を取得したい

     こんばんは。 VB.NETで1つ教えて下さい。 小数点以下の桁数を取得したいのですが どのようにすると良いのでしょうか? 例えば 1.5なら1 2.12なら2 2.555なら3と取得したいのです。 解るかたおられましたら ご教授、宜しくお願いします。

  • VB初心者。小数点以下の表示でつまづいています(2

    『VB初心者。小数点以下の表示でつまづいています(涙』 (・・・過去質問 解決済み) では大変お世話になりました。 さて、上記質問は解決したかに思い、お礼もしてして終了したのですが、 検証しておりましたら問題が見つかりました。 以下、質問内容を修正して、再質問します。よろしくお願いしますm(__)m VB .NET環境 Microsoft Visual Studio / ActiveReportで帳票を作成しています。 DBからの値が、小数点以下ありの場合(例:1.07)の時はそのまま表示し、小数点以下が.00の場合(例:1.00)の時、整数部分のみを表示させたいのです。 質問の『値』ですが、今回の値は小数点第2位までです。 #.00 の時 → # と表示。 #.01~99 の時 → そのまま表示。 としたいのです。 ちなみに、小数点から左(整数部分)の桁は9桁まで入る可能性があります。 前回解決した際は、小数点より右1桁、左1桁で質問してしまったので、  H_数量.Text = Format(Val(H_数量.Text), "0.0")  If Right(H_数量.Text, 2) = ".0" Then  H_数量.Text = Format(Val(H_数量.Text), "0")  End If と回答いただき、このパターンではうまく動きました。 小数点以下2桁のパターンも、コードを変更し、  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でした。 しかし、小数点より左9桁、右2桁を試してみると、ダメなのです。 1行目、  H_数量.Text = Format(Val(H_数量.Text), "0.00") を、  H_数量.Text = Format(Val(H_数量.Text), "#,##0.00") と変更しても、 小数点左が9桁には対応できません。 "###,###,##0" とか、"000,000,000" とか色々試しましたが、 500.00 の時、 000,000,500 と表示されました。 どのようにコードを書いたら良いでしょうか? アドバイスお願いしますm(__)m

  • 算盤 小数が入る掛け算について

    先日質問を1回しましたが。 まず整数と思って計算して、それから小数点を入れるやり方をsping135さんに教えていただきました。この方法なら、やり易いだと思います。 でも、やはり手元の本に載っている方法を気になります。それは、かける数の整数の桁で、答えの1の位を決めて、左指し指を置くというやり方です。その通りでやってみたら、小数点の位置は合わないです。こういうやり方は、到底どういったことなのか、分かる方に教えて頂きたいです。よろしくお願いします。