以MS自带的数据库Northwnd为例，其中有个表是Categories,有四个四段，其中有一个是Image类型的Picture字段。我们首先添加一张bmp图片到最后一行的Picture中，然后在读出来显示到Image控件中。

　　添加一个SqlDataAdapter1,用向导设置联接数据库为Northwnd,SQL语句为SELECT[CategoryID],[CategoryName],Description,PictureFROMCategories.生成一个数据集为dataset1.然后添加两个按钮分别表示写图片到数据库和读数据库，还有一个Image控件用于显示图片。

　　添加以下VB.NET存取数据库图片代码

　　PrivateSub

　　Form1_Load（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）

　　HandlesMyBase.Load

　　SqlDataAdapter1.Fill（DataSet11）

　　VB.NET存取数据库图片的方法有哪些

　　EndSub

　　从数据库读取图片暂时存储为monkey.bmp,然后加载到image控件里面。

　　PrivateSub

　　Button2_Click（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）

　　HandlesLoadPicFromDb.Click

　　Try

　　DimdataAsByte（）=DataSet11.Tables（0）。Rows（7）。Item（3）

　　DimmyfilestreamAsNewSystem.IO.FileStream（Application.StartupPath&"\monkey.bmp",IO.FileMode.Create）

　　myfilestream.Write（data,0,data.Length）

　　myfilestream.Close（）

　　PictureBox1.Image=NewBitmap（Application.StartupPath&"\monkey.bmp"）

　　Catch

　　EndTry

　　EndSub

　　把C:\6.bmp写入库中，你可以改为自己的图片。

　　PrivateSub

　　Button3_Click（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）

　　HandlesInsertPicToDb.Click

　　DimmyfilestreamAsNewSystem.IO.FileStream（"c:\6.bmp",IO.FileMode.Open）

　　Dimdata（）AsByteReDimdata（myfilestream.Length-1）

　　myfilestream.Read（data,0,myfilestream.Length）

　　myfilestream.Close（）

　　DataSet11.Tables（0）。Rows（7）。Item（3）=data

　　SqlDataAdapter1.Update（DataSet11.GetChanges（））

　　EndSub

到此，关于“VB.NET有哪些存取数据库图片的方法”的学习就结束了，希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习，快去试试吧！若想继续学习更多相关知识，请继续关注网站，小编会继续努力为大家带来更多实用的文章！