文字列:文字列変数の値を右詰めまたは左詰めにする(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 |
実行結果
関連記事
-
-
ユーザー定義定数(Const ステートメント)
定数を使う ユーザー定義の定数を使用するには、Const ステートメントを使って …
-
-
カレントフォルダ(CurDir 関数、ChDir ステートメント、ChDrive ステートメント)
カレントフォルダ カレントフォルダとは、ブックを開いたり保存するときに既定で参照 …
-
-
引数が省略されたかどうかをチェックする( IsMissing 関数 )
IsMissing 関数の使い方 【書式】 result = IsMissing …
-
-
変数が日付型かどうかをチェックする( IsDate 関数 )
IsDate 関数の使い方 【書式】 result = IsDate( expr …
-
-
日付時刻:日付時刻から情報取得( DatePart 関数 )
DatePart 関数(日付・時刻の値から情報を取得) 【書式】 result …
-
-
取り消し線を設定する(Strikethrough プロパティ)
取り消し線を設定する(Strikethrough プロパティ) Striketh …
-
-
上付き文字・下付き文字(Superscript,Subscript)
上付き文字(Superscript プロパティ) Superscript プロパ …
-
-
VBA で正規表現を使う(RegExp オブジェクトのメソッド)
RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …
-
-
フォントサイズ(Size プロパティ・StandardFontSize プロパティ)
フォントサイズを取得・設定する(Size プロパティ) Size プロパティは、 …
-
-
日付時刻:経過時間を取得( Timer 関数 )
Timer 関数の使い方 【書式】 result = Timer () 【戻り値 …