フォームのビックチャボックスに、mdbの写真ファイルを表示したい(VB.NET 2003)

Question

 

こんにちは！また　新米PG　k.Tyouです。

 

今、mdbのあるテーブルの中に、ビットマップファイルを保存してます。

mdb名：Nwind.mdb

テーブル名：boschPama

デザイン：フィールド名― 　ID　(データ型：オートナンバー)                        

                     ―　写真　(OLEオブジェクト型)

■動作：    

boschPamaテーブルに保存されている写真をPictureBoxに表示したいができなくて困っています。

コーディングはこのように書いてます。

 

Private Sub frmPerm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

　  

　　 Dim St As String
    Dim Cn As New System.Data.OleDb.OleDbConnection
    Dim SQL As System.Data.OleDb.OleDbCommand
    Dim UserID As String = "Admin"
    Dim Password As String = ""
    Dim MDBFile As String = "C:\Program Files\ActiveReportsNET3\Data\Nwind.mdb"

    St = "Provider=""Microsoft.Jet.OLEDB.4.0"";"
    St &= "Data Source=""" & MDBFile & """;"
    St &= "User ID=" & UserID & ";"
    St &= "Jet OLEDBatabase Password=" & Password

    Cn.ConnectionString = St

    SQL = Cn.CreateCommand

    SQL.CommandText = "SELECT 写真 FROM boschPama"

    Cn.Open()

    MessageBox.Show("テーブルオープンしました。")

　　

　　'ここで、PictureBox.image = 。。。。。。でセットしてあげたいのですが。。。。。

 

    Cn.Close()
    SQL.Dispose()
    Cn.Dispose()

 

End Sub

 

よろしくお願いします。