文字列:文字列変数の値を右詰めまたは左詰めにする(RSet ステートメント・LSet ステートメント)
2015/05/15
RSet ステートメント・LSet ステートメント
< RSet ステートメント >
RSet stringvar = string
< LSet ステートメント >
LSet stringvar = string
【項目の説明】
- stringvar ・・・ 右詰または左詰めを行う文字列変数名。
- string ・・・ 格納される任意の文字列・文字列式を指定します。
RSet ステートメント
引数 stringvar が引数 string よりも長い場合、引数 stringvar の余った部分(左側)をスペースで埋めます。
また、引数 stringvar が引数 string より短い場合、stringvar に格納できる長さの文字だけ stringvar にコピーされ、格納できない部分は切り捨てられます。
LSet ステートメント
引数 stringvar が引数 string よりも長い場合、引数 stringvar の余った部分(右側)をスペースで埋めます。
また、引数 stringvar が引数 string より短い場合、stringvar に格納できる長さの文字だけ stringvar にコピーされ、格納できない部分は切り捨てられます。
RSet ステートメントでは、ユーザー定義型の変数を使用することはできません。
また、LSet ステートメントを使って、あるユーザー定義型の変数を別のユーザー定義型の変数にコピーすることは可能ですが、できる限りしないほうがよいでしょう。あるデータ型のデータを別のデータ型で予約されている領域にコピーすると、予期しない結果が生じる可能性があります。
RSet ・LSet ステートメントの使用例
引数 stringvar が引数 string よりも長い場合
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Sub Sample_Set1() Dim myLeft, myRight, myStr myRight = "1234567890" myLeft = "1234567890" myStr = "1234567890" RSet myRight = "あいうえ" LSet myLeft = "あいうえ" MsgBox myStr & Chr(13) & myRight & Chr(13) & myLeft End Sub |
実行結果
引数 stringvar が引数 string よりも短い場合
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Sub Sample_Set2() Dim myLeft, myRight, myStr myRight = "12345" myLeft = "12345" myStr = "12345" RSet myRight = "あいうえおかきくけこ" LSet myLeft = "あいうえおかきくけこ" MsgBox myStr & Chr(13) & myRight & Chr(13) & myLeft End Sub |
実行結果
関連記事
-
セルのデータを固定長形式で複数のセルに分割する(TextToColumns メソッド・Parse メソッド)
固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …
-
変数が日付型かどうかをチェックする( IsDate 関数 )
IsDate 関数の使い方 【書式】 result = IsDate( expr …
-
色を設定する(QBColor 関数)
QBColor 関数 QBColor 関数は、指定した色番号に対応するRGB コ …
-
引数の整数部分を取得する(Fix 関数・Int 関数)
Fix 関数・Int 関数の使い方 【書式】 number_fix = Fix …
-
取り消し線を設定する(Strikethrough プロパティ)
取り消し線を設定する(Strikethrough プロパティ) Striketh …
-
テキストファイル(UTF-8)を読み込み、書き出し(ADODB.Stream)
Stream オブジェクト ADO(ActiveX Database Objec …
-
指定したセル範囲のサイズを変更(Resize プロパティ)
Resize プロパティ 指定したセル範囲のサイズ(行数や列数)を変更します。 …
-
上付き文字・下付き文字(Superscript,Subscript)
上付き文字(Superscript プロパティ) Superscript プロパ …
-
VBAの変数宣言
VBAの変数宣言について 変数を暗黙的に宣言する エクセル VBA の場合、明示 …
-
文字列:文字列の空白を削除(Trim 関数, LTrim関数, RTrim関数)
Trim 関数・LTrim 関数・RTrim 関数の使い方 【書式】 <先頭と末 …