質問: Access97で初めて入力フォーム作成にチャレンジしています。 リストボックスやコンボボックスで複数データを選択し、1つのフィールドに入力したいのですが、可能でしょうか? よろしくご教示ください。 例:”趣味”というフィールドに リストからの選択で ”読書,映画,テニス”のように入力したい。 (カンマ区切り、スペース区切り、区切りなし など何でも結構です。) *ベストはカンマ区切り。
回答: >OKボタンか何か作成して、そこでまとめて設定をするのが >正しいのでしょうか このHPの左にあるラジオボタンもそうですが、そこをクリックしただけでは、次に進みませんよね? 最終に、[回答する]をクリックした時に、次に進む。 これと同じようなイメージで説明してました。 >項目がある程度あるならば、配列的に名前をつけて この部分をモジュールに書いてみました。 フォーム上には10個のチェックボックスがあるとします。 □ 趣味1 □ 趣味2 ・ ・ □ 趣味10 □のチェックボックスの名前はチェック0から9と入力してあります。 「趣味1から10」はラベルで、標題に入力した値が表示されています。名前は、ラベル0から9と入力しています。 Private Sub コマンドボタン_Click() Dim Cnt As Integer Dim FLG As Integer Dim 趣味 As String FLG = 0 趣味 = "ありません!" For Cnt = 0 To 9 If Me("チェック" & Cnt) Then If FLG = 1 Then 趣味 = 趣味 & "," Else 趣味 = "" End If 趣味 = 趣味 & Me("ラベル" & Cnt).Caption FLG = 1 End If Next Cnt MsgBox ("あなたの趣味は " & 趣味 & " です") End Sub 実際には、最後のMsgboxがレコード等に格納する命令に置き換わる事になると思います。 只、入力はこれでいいと思いますが、実際に格納されたデータを表示するのはちょっと・・・って思う所はあるのですが、要望がカンマ区切りで1つのフィールドに格納したいってことでしたので。