Access2010 テキストの連結

質問

よろしくお願いします。

Access2010を使用しております。
非連結のフォームに入力した情報を、
保存ボタンで、テーブルに追加しております。
そこで、サブフォームにある複数のテキストボックスをボックス毎に改行して、
一つのフィールドに入れたいと思っております。
一つ一つのテキストボックスは別テーブルを作っておりますが、メインにしているテーブルには、一つのフィールドに入れたいのです。
txt箱1、txt箱2、…txt箱20の空白ではないテキストボックスを改行して、一つのフィールドに追加したいです。

テキストボックスが、ランダムに記入されていたり、空白が間にあると、
うまく一つのフィールドに入れることができません。
改行が何個も入った箇所ができてしまいます。

間に空白があっても、改行を綺麗に入れて、
一つのフィールドに入力させるには、どうしたらよろしいでしょうか。

お世話になりますが、よろしくお願いします。

回答No.2

bin-chan

テキスト型だと最大255文字まで。
項目わけ用文字を最少限としても、39文字必要だから、
各テキストボックスは約10文字ずつの入力。
これで目的が果たせるものとして、各テキストボックスは改行有？無？

＃１さんの回答の通りvbCRで区切るか、
各テキストボックスで入力させない文字（例"|"shift+￥）で連結して格納。
取出時にSPLITで分解。

Forループ作って
Control(”txt箱” & trim(添字))で書けば、処理をまとめられるし。

お礼

ありがとうございます。
いろいろ検索しましたが、Controlの使い方がわからず、
うまくいきませんでした。
せっかくご教授いただいたのに、申し訳ありません。

回答No.1

山田 太郎（@f_a_007）

現状: "AAAA" chr(13) "BBBB" chr(13) chr(13) "EEEE"
改変: "AAAA" chr(13) "BBBB" chr(13) "" chr(13) "EEEE"

で、

chr(13) "" chr(13)⇒chr(13)

に変換。

と、私なら発想しアタックするが・・・。質問者は、どういうアイデアをどういうコードにしているのかな？そして、そのどこで躓いているのかな？そろそろ、それを示してピンポイントで解決策を問うという次元に移行すべきかな。

お礼

ありがとうございます。
できました！
これから、勉強してまいります。