登録フォームの作成2実践データベース作成の第4回目は登録フォームの作成Part2です。前回はフォームの読み込み時のイベントを作成しましたので、今回はテーブルへ新規レコードを追加するプログラムを作成します。上記のような流れになります。実際にVBAをどのように組み込んでいくのか説明します。コマンドボタン(登録)のクリックイベントコマンドボタンのイベントは「クリック時」になります。コマンドボタンの「クリック時」には以下のプログラムを実行します。実際のプログラムは以下のようになります。MsgBox(“登録を行います。“登録が完了しました。各テキストボックス、コンボボックスが未入力(Null値)の場合、警告メッセージを表示し、プログラムをその時点で終了させます。未入力エラー処理の詳細はこちらを参照して下さい。登録処理(1)Yes/No型のメッセージボックスを表示し、Yesが選択された場合のみ登録処理を実行します。(2)ADOを使用して「T_社員マスタ2013」を開きます。(3)【Add.New】で新規入力データを「T_社員マスタ2013」に追加します。(4)登録が完了したメッセージを表示します。Null】各テキストボックス、コンボボックスの値を空にします。Form_Load】フォームの再読み込みを行います。フォームの再読み込みを行うことで新たに新規社員コードを取得し直します。いかがでしょうか?これでコマンドボタンのクリック時イベントは終了です。登録フォームの作成もこれにて完了になります。次回からは社員検索フォームの作成に移ります。Tubeにて登録フォームの動画を公開しました。画像だけですとイメージしにくい方は参考にして下さい。実践データベース作成の第2回目はテーブルの作成を行います。実践データベース作成の第10回目はメインフォームの作成です。データベース作成の実践編として数回に渡り、AccessVBAを使用したデータベース作成の手順を公開していきます。実践データベース作成の第3回目は登録フォームの作成を行います。実践データベース作成の第6回目は検索フォームの作成Part2です。