ベストアンサー

フォームのテキストボックス→クリックしたら"○"が表示。

2003/02/07 23:43

アクセスのフォームにて、テキストボックスを用意し、そのテキストボックスをクリックしたら、そのテキストボックスに自動的に○が表示されるようにできるのでしょうか？？また、それをテーブルのフィールドに反映させるには連結させておけばいいのですよね？？アクセス暦数時間です。。すみませんが、力を貸してください。

seapassion
お礼率21% (62/287)

オフィス系ソフト
回答数3
ありがとう数3

みんなの回答 （3）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

imogasi
ベストアンサー率27% (4737/17070)

2003/02/08 09:56 回答No.3

#1のご回答で玄人には正解なんですが、「アクセス暦数時間」と言うことなので、いきなりＶＢＡでは、分かり難いと思うので。学習の筋道に沿って説明すると（１）問題のフィールドのデータをストリングにしておく。（フイールド名を仮に「応諾」とする）。　　○が文字扱いなので。本来その項目内容が数値項目なら苦しい。（２）フォーム－新規作成（３）フォームウイザード（４）基になるテーブル選択－テーブルを選択する－ＯＫ（５）選択可能なフィールド－　＞＞　－　次ぎへ（６）単票形式－次ぎへ（７）標準－次ぎへ（８）完了（９）フォーム上で右クリック（１０）フォームデザイン（１１）問題の項目「応諾」をクリック（１２）プロパティをクリック（１３）イベント・タブをクリック（１４）「クリック時」の行をクリック（１５）表の右欄外「・・・」をクリック（１６）コードビルダをダブルクリック（１７）Private Sub 応諾_Click() End Subが出る。（１８）真中の空き行に　　　　応諾.text="○" 　　　　と入れる。　　　　右上ボタンＸをクリックして閉じる。（１９）右上ボタンＸをクリックして閉じる。（２０）フォームの変更を保存しますか－はい以下略

質問者

お礼 2003/02/09 21:29

ご回答ありがとうござました。とても、参考になり、見事できました。。ほんとうにありがとうございます。

ログインすると、全ての回答が全文表示されます。

その他の回答 (2)

s-eight
ベストアンサー率19% (6/31)

2003/02/08 00:16 回答No.2

No.1の方の答えで、十分かとは思いますが。テーブルを１つ用意してください。フィールドは、テキストが入るところがひとつあればよいです。テーブル名を「テスト」、フィールドを「テキスト」としときましょうか。フォーム作成画面で、新規フォームを作ります。フォームのプロパティを開き、データのコントロールソースに、「テスト」テーブルを指定します。表示メニューから、フィールドリストを表示させ、「テキスト」をドラッグアンドドロップしてフォーム上に落として配置します。これで、「テスト」テーブルの「テキスト」フィールドと連結されたテキストボックスがフォーム上に作成されました。あとは、No.1の方が言われるように、コードを書くか、新規マクロを作成し、アクション名を「値の代入」、アイテムを「テキスト」、式を「"○"」として、フォーム中のテキストのプロパティで、イベントの「クリック時」に、さっきのマクロを指定すれば、同じようになります。

質問者

お礼 2003/02/09 21:29

ご回答ありがとうござました。とても、参考になり、見事できました。。ほんとうにありがとうございます。

ログインすると、全ての回答が全文表示されます。

MovingWalk
ベストアンサー率43% (2233/5098)

2003/02/07 23:54 回答No.1

>そのテキストボックスをクリックしたらテキストボックスの「クリック時のイベント」をイベントプロシージャにして Private Sub テキスト1_Click() Me.テキスト1.Text = "○" End Sub のように書けばいいかと思います。 >それをテーブルのフィールドに反映させるには連結させて自分でやってみればわかると思います。

質問者