Accessで、１文の文字列から、区切りごとに各項目に文字列を抽出

Question

下記のように、『 , 』カンマ区切りで１文になっている文字列から、

区切り別に、テキストボックスに値を取得させる関数などはありますでしょうか？

例では、並び順の設****をするようなVBを組んでいますが、他にも様々なケースで使えそうかと思います。

dim sORDER as String

'フォームの並び順を取得

フォーム.ORDERBY="A, B, C, D"

sORDER=フォーム.ORDERBY

テキスト１=sORDERの１つ目の『 , 』より左までの文字列

テキスト2=sORDERの１つ目の『 , 』と２つ目の『 , 』の間の文字列

テキスト3=sORDERの２つ目の『 , 』と３つ目の『,  』の間の文字列

テキスト4=sORDERの３つ目以降の文字列

Answer 1

Ｓｐｌｉｔ関数を使うといいでしょう。

dim vORDER as Variant

'フォームの並び順を取得

フォーム.ORDERBY="A, B, C, D"

vORDER=Split(フォーム.ORDERBY, ",")

テキスト１=Trim(vORDER(0))

テキスト2=Trim(vORDER(1))

テキスト3=Trim(vORDER(2))

テキスト4=Trim(vORDER(3))

並び替えのフィールドが４つないときはインデックスエラーになるので、

その辺のチェックは追加してください。

Answer 2

split関数は今まで見た事がなかったので、大変ありがたいです。

有効活用させて頂きます。