Access VBA 入門講座

Homeオプションボタンオプションボタン

オプションボタンの設置方法と初期値の設定方法について説明します。まずオプションボタンを設置する前にオプショングループを設定します。

1.ツールボックスよりオプショングループのアイコンをクリックします。

1.ツールボックスよりオプショングループのアイコンをクリックします。

2.オプショングループを設置したい場所をクリックし、ドラックアンドドロップで配置します。

2.オプショングループを設置したい場所をクリックし、ドラックアンドドロップで配置します。

3.メニューより[表示]⇒[プロパティ]をクリックします。

3.メニューより[表示]⇒[プロパティ]をクリックします。

4.[すべて]タブを選択し、名前を変更します(例ではopgSelect)。

4.[すべて]タブを選択し、名前を変更します(例ではopgSelect)。

5.テキストボックスよりオプションボタンのラベルを選択します。

5.テキストボックスよりオプションボタンのラベルを選択します。

6.[すべて]タブを選択し、名前と標題を変更します(例では名前をlblSelect、標題を"よく使用する検索エンジンは?")プロパティを閉じます。

6.[すべて]タブを選択し、名前と標題を変更します(例では名前をlblSelect、標題を

7.ツールボックスよりオプションボタンのアイコンをクリックします。

7.ツールボックスよりオプションボタンのアイコンをクリックします。

8.オプションボタンを設置したい場所をクリックし、ドラックアンドドロップで配置します。

8.オプションボタンを設置したい場所をクリックし、ドラックアンドドロップで配置します。

9.メニューより[表示]⇒[プロパティ]をクリックします。

9.メニューより[表示]⇒[プロパティ]をクリックします。

10.[すべて]タブを選択し、名前を変更します(例ではoptYahoo)。

10.[すべて]タブを選択し、名前を変更します(例ではoptYahoo)。

11.テキストボックスよりオプションボタンのラベルを選択します。

11.テキストボックスよりオプションボタンのラベルを選択します。

12.[すべて]タブを選択し、名前と標題を変更し(例では名前をlblSelect、
標題を"Yahoo")プロパティを閉じます。

12.[すべて]タブを選択し、名前と標題を変更し(例では名前をlblSelect、標題を

13.7から12の手順を追加したいオプションボタン分繰り返します(例ではオプションの名前はoptYahoo オプション値=1,optGoogle オプション値=2,optMsn オプション値=3,optSonota オプション値=4に設定しています)。

13.7から12の手順を追加したいオプションボタン分繰り返します(例ではオプションの名前はoptYahoo オプション値=1,optGoogle オプション値=2,optMsn オプション値=3,optSonota  オプション値=4に設定しています)。

14.ボタンを追加後、テキストボックスよりフォームを選択します。

14.ボタンを追加後、テキストボックスよりフォームを選択します。

15.[イベント]タブを選択し、チェックボックスの[読み込み時]を選択し右に表示される
[...]ボタンをクリックします。

15.[イベント]タブを選択し、チェックボックスの[読み込み時]を選択し右に表示される[...]ボタンをクリックします。

16.Private Sub~がコード内に挿入されます。

16.Private Sub~がコード内に挿入されます。

17.SubとEnd Subの間にコードを入力し(例ではGoogleを選択した状態でフォームをロードします。)VBEのウィンドウ閉じます。

17.SubとEnd Subの間にコードを入力し(例ではGoogleを選択した状態でフォームをロードします。)VBEのウィンドウ閉じます。

18.メニューボタン[フォームビューを]選択します。

18.メニューボタン[フォームビューを]選択します。

19.フォームがオプションボタンを選択した状態でロードされます。

19.フォームがオプションボタンを選択した状態でロードされます。