vb.net 教程 8-3 数据库操作9-1

NorthWind数据库中，类别表的图片字段是OLE对象，打开表查看可以看到是一个Bitmap Image，实际就是一个二进制值：

双击某一个类别的Bitmap Image 可以打开画图查看图片：

那么我们现在需要将图片读出来。

设计界面如下：

先看代码：

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click        Dim odc As New OleDbConnection()        odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"
        Dim sql As String = "select 图片 from 类别 where 类别ID=3"        Dim imageCmd As New OleDbCommand(sql, odc)        Dim datareader As OleDbDataReader        odc.Open()        Try            datareader = imageCmd.ExecuteReader(CommandBehavior.SequentialAccess And CommandBehavior.SingleResult)
            Dim readerData() As Byte            datareader.Read()            readerData = datareader(0)
            Dim ms As New MemoryStream()            ms = New MemoryStream(readerData)
            Dim img As Image = Image.FromStream(ms)            PictureBox1.Image = img
            ms.Close()
        Catch ex As Exception            MessageBox.Show(ex.Message)        Finally            datareader.Close()            odc.Close()        End Try    End Sub

代码简单讲解一下：
1、建立连接，新建一个sql语句，建立command；
2、定义一个DataReader，在这个例子里，datareader在Command。ExecuteReader的时候只需要单一结果；
3、建立一个字节数组，并且使字节数组的值为 datareader(0)，也就是读取的二进制；
4、创建一个内存流，将上一步读取的字节数组写入流；
5、使用Image的FromStream方法创建一个image，并在图片框中显示；
6、关闭流，关闭datareader，关闭连接。
7、在程序中用到了try……catch……处理错误。

然后运行结果如下：

额。。。这是怎么回事呢？

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看vb.net 教程 目录