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
教程 目录