アクセスフォーム コンボボックスで選んだ値を別のテキストボックスにまとめて表示したい！

他でもコンボボックスの質問をしましたringo0120です。質問が２つに分かれて申し訳ありません。

アクセスフォームの中に「Ａ」「Ｂ」「Ｃ」「Ｄ」と
４つのコンボボックスがあります。
　「Ａ」あいう
　「Ｂ」えお
　「Ｃ」かき
　「Ｄ」く
というふうにコンボボックスで選んだとします。
この４つをまとめてポンと他のボックスにくっつけて
表示したいのです。
　「テキストボックス」あいうえおかきく
というふうに。

どうやってもうまくいきません。
誰か教えてください！
よろしくお願いします。

No.1 ベストアンサー 回答者： dokumori 回答日時： 2004/07/10 08:00

VBAを使えばできると思いますが、VBA分かりますか？

えと、A,B,C,D全てのコンボを選択するという
前提が必要になりますが、こういう形でやっては如何でしょう：

ＤのLost Focusイベントの際に、A,B,C,Dの
テキスト全てを拾って、テキストボックスに表示する、というの。
以下、テキトーに書きますし、コンボ名とかも分かんないので、そのままコピペしても使えないと思いますが、参考まで。


Private Sub ComboD_LostFocus()
Me.(テキストボックス名).value = Me.ComboA.Value & Me.ComboB.Value & Me.ComboC.Value & Me.ComboD.Value

End Sub



あと、敢えてValueを拾っているのは、Accessの場合、Textを拾おうとすると、SetFocusが必要になるのでウザイのです。

ぐっどらっく。

この回答へのお礼

ありがとうございますー！！！！
出来ました！
びっくりです。
ホントにありがとうございます！！

お礼日時：2004/07/11 11:32