データベースⅠ

プログラムの概要

データベースプログラムを手軽に作成する方法とし てはAccess のフォーム機能を用いる事が、先ず考え られます。ウィザードも充実しており、操作を覚え れば簡単に作成する事が出来ます。其れでは、VB で データベースプログラムを作るメリットは何んでし ょうか。１つはAccess のフォーム機能に比べ、コン トロールが充実している事。より自由なデザインが 可能です。もう１つ重要な点は、「データベースソフ ト」を選ばない事です。 小規模な運用であれば、Access は十分な能力を発揮 しますが、中規模、大規模になってくると、力不足 に成る可能性が高く成ります。VB でソフトを作成し て置けば、「Access では力不足だ」と感じた時でも、 今迄作成した内容を少し変更するだけで、他のデー タベースソフトへ乗り換える事が可能です。逆に Access のフォーム機能で作成した場合は今迄の作業 の殆どを１から作り直す必要が有るでしょう。此処では、データベースプログラムを作成する上で不可 欠な、「SQL 文」を主に学びます。

データベース操作プログラムⅠ

VB 2005 ⑧ □ コントロールの利用（GroupBox、RadioButton、AxDataGrid） □ プロパティの値の取得と設定（Height、Width、Tag、DataMember） □ イベントハンドラの利用（Handles、Load、Resize、Click） □ ADODB のオブジェクト（Connection、Recordset） □ ADODB のプロパティとメソッド（CursorLocation、ConnectionString、Open、Close） □ AxDataGrid の利用（データバインディング、DataSource） 今回の課題項目 □ フォームサイズ変更に伴うオブジェクトのサイズ変更（Anchor） □ データベースとの接続（ADODB.Connection、ADODB.Recordset） □ データベースとの連結（DataGrid：DataSource） □ SQL 文（SELECT 文：レコードを検索する文） 今回の重点項目 □ 様々な SQL 文を試してみる。 今回の応用項目

■ ツールボックスのカスタマイズ ■ 今回使用するコントロールの内、AxDataGrid は、標準では、ツールボックスには表示されて居ない。 標準でツールボックスに表示されて居ないコンポーネントを追加して使用出来る様にする手順は、下記 の通りで有る。 此処では、ツールボックスのコンポーネントに追加すると仕て、コンポーネント部を開き、余白部分で 右クリックして表示されるポップアップメニューで『アイテムの選択』をクリックする。

下記のダイアログの『COM コンポーネント』タブで、Microsoft DataGrid Control 6.0 にチェックを入 れて、『OK』ボタンをクリックする。

■ ADODB の参照設定 ■

Visual Studio では、.NET 以降、ADO.NET が追加され、非接続型処理が可能と成ったが、従来の接続 型のADO（ADODB）も使用する事が出来、選択肢が増えた。リアルタイム処理を行う接続型は、デー タベース操作の基本と成る物で有るので、此処では、ADODB を扱う事にする。

Visual Studio 2005 でも、従来同様、ADODB を使用するには、プログラムをコンパイル、又は、ビル トする際に必要と成る参照設定を行う必要が有る。

Visual Studio 2005 で ADODB の参照設定を行うには、先ず、メニューバーの『プロジェクト』で『参 照の追加』をクリックして、ダイアログを開く

ダイアログの『COM』タブで『Microsoft ActiveX Data Object x.x Library』と謂う名前のコンポーネ ントを選択して、『OK』ボタンをクリックすれば、参照の追加が完了する（x.x は、バージョンを示す）。

■ オブジェクト･プロパティ一覧 ■ コントロールの種類 プロパティ プロパティの設定値 フォーム Name bookshelf Text 本棚 Font ＭＳ明朝、標準、９ StartPosition CenterScreen グループボックス Name grpTable Text 表示テーブル ラジオボタン１ Name radBook Text 本 Checked True Tag 0 ラジオボタン２ Name radCategory Text カテゴリ Tag 1 ラジオボタン３ Name radWriter Text 著者 Tag 2

AxDataGrid Name dgdBookshelf

Anchor Top, Bottom, Left, Right

AxDataGrid ラジオボタン1 グループボックス ラジオボタン2 ラジオボタン3 AxDataGrid（データグリッド） データを表形式で表示するコントロール。AxDataGrid コントロールに表示されるデータは、 通常データソースから Recordset オブジェクトに格納され、其の Recordset オブジェクトを AxDataGrid コントロールにバインド（連結）する事に依り、データが表示される。

■ プログラムリスト ■

Public Class bookshelf

Private Cn As ADODB.Connection Private Rs As ADODB.Recordset

' フォームが読み込まれた時の処理

Private Sub bookshelf_Load( ByVal sender As Object, ByVal e As System.EventArgs ) _ Handles Me.Load ' コネクションとレコードセットのインスタンス生成 Cn = New ADODB.Connection Rs = New ADODB.Recordset ' コネクションの確立（データベースへの接続） Cn.CursorLocation = ADODB.CursorLocationEnum.adUseClient

Cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb;" Cn.Open( )

' 選択クエリに依るレコードセットの取得

Rs.Open( "SELECT 本.*,著者.著者名 FROM 本,著者 WHERE 本.著者 ID=著者.ID;", Cn )

' データグリッドへの連結 dgdBookshelf.DataSource = Rs End Sub

' フォームが閉じられ様と仕た時の処理

Private Sub bookshelf_FormClosing( ByVal sender As Object, _

ByVal e As System.Windows.Forms.FormClosingEventArgs ) Handles Me.FormClosing ' コネクションとレコードセットのクローズ Rs.Close( ) Cn.Close( ) ' コネクションとレコードセットのインスタンス開放 Rs = Nothing Cn = Nothing End Sub 注意！！ データファイルdata.mdb は、製作中は、当該プロジェクトの bin/Debug フォルダに、亦、コンパ イル後の実行中は、EXE ファイルと同じフォルダに、格納して置く事。 AxDataGrid の Datasource プロ パティにレコードセットをセット する事で、データをバインドする。 コネクションやレコードセット は、使用後、必ず閉じて置く。 インスタンスをメモリから開放す る場合、Dispose メソッドが無い 時は、Nothing を代入する。 オブジェクト変数のインスタンス を生成するには、New キーワード を用いて行う事が出来る。 此等のオブジェクト変数は、イン スタンスを生成してからでないと 使用する事は出来ない。

' フォームのサイズが変更された時の処理

Private Sub bookshelf_Resize( ByVal sender As Object, ByVal e As System.EventArgs ) _ Handles Me.Resize

' サイズの最小限度

If Me.Width < 300 Then Me.Width = 300 If Me.Height < 300 Then Me.Height = 300 End Sub

' ラジオボタン（本・カテゴリ・著者）がクリックされた時の処理

Private Sub radBook_Click( ByVal sender As Object, ByVal e As System.EventArgs ) _ Handles radBook.Click, radCategory.Click, radWriter.Click

Dim SQL As String

Select Case sender.tag Case 0

SQL = "SELECT 本.*,著者.著者名 FROM 本,著者 WHERE 本.著者 ID=著者.ID;" Case 1 SQL = "SELECT * FROM カテゴリ;" Case 2 SQL = "SELECT * FROM 著者;" End Select ' レコードセットのクローズ Rs.Close( ) ' レコードセットの更新 Rs.Open( SQL, Cn ) ' データグリッドへの連結 dgdBookshelf.DataSource = Rs End Sub End Class フォームサイズを縮小する時の下 限を設定して居る。値は、作成し たフォームに応じて、適宜変更し て使用する。 複数のイベントハンドラを設定し たイベントプロシージャで、Tag をオブジェクトの判別に利用。 開かれて居るレコードセットに対 してOpen メソッドを実行すると エラーが発生するので、一旦、レ コードセットをClose メソッドを 用いて閉じる。 各ラジオボタンに応じて、選択ク エリ（SQL 文）を生成する。 引数に選択クエリと有効なコネク ションを指定してレコードセット を開くと、指定した選択クエリに 応じたデータがレコードセットに 格納される。 複数のイベントハンドラを設定したプロシージャを記述するには 複数のイベントハンドラを設定したプロシージャを記述するには、先ず、対象と成るコントロール の孰れかをダブルクリックするか、又は、オブジェクト一覧で当該コントロールを選択した後、イ ベント一覧から使用するイベントを選択して、イベントプロシージャのコードを自動生成させてか ら、Handles に残りのコントロールのイベントハンドラを追加すると簡単で有る。 猶、プロシージャ名は、Visual Basic.NET 以降では、特別な意味を持たないので、自由に変更して も構わない。例えば、上記の radBook_Click は、RadioButtonClick の様な名前に変更しても、問 題無く動作する。

ACCESS で SQL 文を使用する １．『data.mdb』を開き、『オブジェクト』内の『クエリ』をクリックすると、以下の様な画面に成るの で、『デザインビューでクエリを作成する』をダブルクリックする。 ２．『テーブルの表示』ダイアログボックスが表示されるので、『本』を追加後、『閉じる』ボタンをク リックして、ダイアログボックスを閉じる。 ACCESS では或る条件の元に、視覚的に、データを検索したり、追加したり、変更したり、削除 する機能『クエリ機能』が存在する。非常に便利な機能だが、命令文而巳で、データを操作出来る 言語が存在する。其れがSQL で有る。ACCESS 而巳使用するので有れば、此の様な、小難しく、 古臭い言語を覚える必要は無い。何故なら、SQL の進化系が ACCESS の様な視覚的にデータを操 作する機能だからで有る。併し、未だに全世界で使われ続けて居る理由が有る。ORACLE や SQLServer 等と謂う名前を聞いた事が有ると思う。共にデータベースソフトだが、然うした類の 数多くはSQL を採用して居る。即ち、SQL を覚えれば、ACCESS 以外のデータベースソフトのデ ータを操作する事が出来ると謂う事で有る。亦、ACCESS も例外で無く SQL を直接入力し、実行 出来る機能が有る。此処では其の機能の使用法を説明する。

３．フィールドに『本』テーブルの『＊』をドラッグドロップ後、メニューバーの『表示』をクリック して、ドロップダウンメニューから『SQL ビュー(Q) 』を選択する。 ４．上記の操作で、『デザインビュー』で作成した選択クエリが、SQL 文と成り『SQL ビュー』に表示 される。ツールバー上の （実行ボタン）をクリックすると、指定したクエリーの結果が『デ ータシートビュー』に表示される。 此れでSQL を勉強する準備が完了した。先程の操作からも解る様に、『デザインビュー』で操作した内 容と『SQL ビュー』の内容は、大方連動して居る。今迄に ACCESS のクエリ機能で作成した SQL が 何の様に記述されて居るのか確認するのも効果的な勉強と謂えるが、今回は1 文宛、直接入力する事で 何の様なSQL が有るかと謂う事を学ぶ事にする。以下に記述した SQL を実際に入力し、結果を確認し

SQL（Structured Query Language：構造化照会言語）とは 直訳すると難しく成るが、プログラミング知識の無いオペレーターが簡単にデータを操作出来る様に編 み出された言語で有る。国際規格（ISO）にも定められて居る為、ORACLE でも SQLServer でも基本 は同じで有る。４つの構文を覚える事で、様々な、データーベースのデータを扱う事が可能に成る。 SQL の４大構文 下記の構文をSQL の４大構文と謂う。 SELECT 文 ：データを探す文 DELETE 文 ：データを削除する文 INSERT 文 ：データを追加する文 UPDATE 文 ：データの内容を変更する文 SELECT 文の解説 データを探す構文 SELECTΔフィールド名ΔFROMΔテーブル名ΔWHEREΔ検索条件 例文１：SELECTΔ*ΔfromΔ本; 解 説：『＊』（アスタリスク）は、フィールド総てを表す。 本と謂う名前のテーブルに在る全件数のレコードを検索し、総てのフィールドのデータを取得する 例文２：SELECTΔタイトル,価格ΔfromΔ本; 解 説：フィールドを複数指定する場合は『タイトル,価格』の様に『，』（コンマ）で区切る。 本と謂う名前のテーブルに在る全件数のレコードを検索し、タイトル、価格フィールドのデータを取得する 例文３：SELECTΔ*ΔfromΔ本ΔWHEREΔ価格=2500; 解 説：『＊』（アスタリスク）は、フィールド総てを表す。 本と謂う名前のテーブルに在る価格フィールドが2500 のレコードを検索し、総てのフィールドのデータを取得する 例文４：SELECTΔ*ΔfromΔ本ΔWHEREΔタイトルΔLIKEΔ’%VB%’; 解 説：SQL 文内で文字列を指定する場合は『’』（シングルクオーテージョン）で区切る。 本と謂う名前のテーブルに在るタイトルフィールドに’VB’という文字列が含まれるレコードを検索し、総てのフィールド のデータを取得する

例文５：SELECTΔ本.タイトル,本.価格,著者.著者名ΔfromΔ本,著者ΔWHEREΔ本.著者 ID=著者 ID;

解 説：複数テーブルを関連付けた SELECT 文を記述する事が出来る。使用するテーブル はFrom 句の後ろに 2 つ目以降『，』(コンマ)で区切り、指定する。亦、フィールド 指定は必ず『テーブル名.フィールド名』とする。理由は、異なるテーブルで、同じ フィールド名を使用して居るケースも有るから。 本テーブルの著者ID フィールドと著者テーブルの ID フィールドを関連付け、本.タイトル、本.価格、著者.著者名フィ △は半角スペースを意味する（以下、総ての構文で同じ）。 ACCESS で SQL 文を使用する場合は、文の末尾に『；』（セミコロン）をつける。 機 能 書 式 解 説

DELETE 文の解説 データを削除する構文 DELETEΔFROMΔテーブル名ΔWHEREΔ条件 例文１：DELETEΔFROMΔ本ΔWHEREΔ価格=2500; 解 説：SELECT 文と似て居るが、DELETE 文の場合はフィールド名を指定し無い。 本と謂う名前のテーブルの価格が2500 と謂うデータレコードを削除する 例文２：DELETEΔFROMΔ本; 解 説：条件を指定し無いと、総てのデータレコードが削除される。 本という名前のテーブルのデータレコードすべてを削除する INSERT 文の解説 データを追加する構文 INSERTΔINTOΔテーブル名(フィールド名,フィールド名)ΔVALUES(追加する数値データ,’追加する文字列データ’) 例文１：INSERTΔINTOΔ本ΔVALUES(9,’VB ファン’,4000,’2000/5/5’,4,4); 解 説：例えば『VB ファン』の様に、文字列型のデータを追加する場合は、『’』（シングル クオーテーション）で区切る。亦、フィールドとフィールドを区切る文字は『，』（コ ンマ）を使用する。

本テーブルにID:9、タイトル:’VB ファン’、価格:4000、購入日:’2000/5/5’、カテゴリ ID:4、著者 ID:4 のレコードを追加

例文２：INSERTΔINTOΔ本(タイトル,価格,購入日,カテゴリ ID, 著者 ID)ΔVALUES(’VB ファン’,4000,’2000/5/5’,4,4); 解 説：特定のフィールドにデータを挿入し無い場合は、省略出来る。上記の例では、ID フィールドを省略して居る。実行した後、データを見ると、ID フィールドには『０』 が代入されて居る。猶、文字列型のフィールドの場合は空白と成る。此の状態を 『NULL』と謂う。亦、オートナンバー型フィールドの場合は自動で番号が割り振 られる。 本テーブルに、タイトル:’VB ファン’、価格:4000、購入日:’2000/5/5’、カテゴリ ID:4、著者 ID:4 のレコードを追加する UPDATE 文の解説 データ内容を変更する構文 UPDATE△テーブル名ΔSETΔフィールド名=変更する数値データ,フィールド名=’変更する文字列データ’ΔWHEREΔ変更するデータの条件 例文１：UPDATEΔ本ΔSETΔ価格=8000,購入日=’2000/6/5’ΔWHEREΔタイトル=’VB ファン’ ; 解 説：総てのデータを変更したい場合は WHERE は必要無いが、特定のレコードを変更 したい場合は指定する。 本テーブルのタイトルフィールドが’VB ファン’と謂うレコードの価格を 8000 に、購入日を’2000/6/5’に変更する SQL 文で文字列を記述する場合は、『’』（シングルクオーテーション）で囲む。 機 能 書 式 解 説 機 能 書 式 解 説 機 能 書 式 解 説