質問: アクセスのフォーム画面で入力 アクセス2002のフォームで文字を入力(選択)させてボタンを押すと 別の画面でその入力(選択)した文字が表示させるイベントプロシージャをつくりたいのですがpub sub~end sub内にどういう記述が必要なのでしょうか?
回答: private sub ボタン名_click() dim strform as string dim ctl as control strform = "別フォーム" docmd.openform strform 'フォームが開いている場合はこの行削除 set ctl = forms(strform).controls("別フォームのコントロール") with ctl select case .controltype case actextbox, accombobox .value = me.テキスト case aclabel .caption = me.テキスト case else end select end with end sub