| 投稿日 | ： 2006/11/22(Wed) 11:44 |
| 投稿者 | ： nobu |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: テキストにファイルを読み込んだ時の表示の設定 |
> 例)11111 最大5文字までのデータを左に詰めて、4文字以下は右にスペースを空ける。
> 1111
> 111
> ↑は現在format(a,"@@@@@")で指定しているのですが、aが右詰になってスペースが左にあいてしまう状況で困っています。
下記を比べて見て下さい。 ！のあり、無し
Dim a As String
a = "1111"
Label1.Caption = "#" & Format(a, "@@@@@!") & "#"
Label2.Caption = "#" & Format(a, "@@@@@") & "#"
また下記の様な方法もありかと．．．．．
「11111 最大5文字までのデータ」は数値ですか？ 数字（文字）ですか？
（数値：計算が出来る。 数字：計算が出来ない。）
数値だとして、一度数字（文字）に変換して５桁未満なら空白を加えて５桁に合わせる。
tmp = Left$(Cstr(a) & space(5),5)
ＶＢ６のＨＥＬＰの下記を参照して下さい。
文字列表示書式指定文字 (Format 関数)
文字 内容
@
1 つの文字またはスペースを表します。変換対象 expression の中で @ (アット マーク) に
対応する位置に文字が存在する場合は、その文字が表示されます。文字がなければ
スペースが表示されます。@ は、引数 format に指定した書式の中に表示書式指定文字の
! (感嘆符) がない限り、右から左の順に埋められます。
&
1 つの文字を表します。変換対象 expression の中で & (アンパサンド) に対応する位置に
文字が存在する場合は、その文字が表示されます。文字がなければ何も表示せず、
詰められて表示されます。& は、引数 format に指定した書式の中に表示書式指定文字の
! (感嘆符) がない限り、右から左の順に埋められます。
<
小文字にします。すべての文字は小文字に変換されます。
>
大文字にします。すべての文字は大文字に変換されます。
!
文字を右から左ではなく、左から右の順に埋めていくように指定します。
この文字を指定しない場合は、右から左の順に埋められます。