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

发布时间：2020-12-16 23:51:36 所属栏目：大数据来源：网络整理

导读：NorthWind数据库中，类别表的图片字段是OLE对象，打开表查看可以看到是一个Bitmap Image，实际就是一个二进制值：双击某一个类别的Bitmap Image 可以打开画图查看图片：那么我们现在需要将图片读出来。设计界面如下：先看代码： Private Sub Button3_Cl

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博客教程8 数据库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 教程目录

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!