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

前端之家收集整理的这篇文章主要介绍了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 教程 目录

原文链接:https://www.f2er.com/vb/256246.html

猜你在找的VB相关文章