大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
这个我也不太知道,我也在学这门语言,可以交流一下吗?
荔波网站建设公司创新互联,荔波网站设计制作,有大型网站制作公司丰富经验。已为荔波千余家提供企业网站建设服务。企业网站搭建\外贸网站建设要多少钱,请找那个售后服务好的荔波做网站的公司定做!
QQ:38121913
一旦从文件中将图像加载完毕就和文件没有关系了,除非在加载图片的时候进行记录,比如把图片路径(或名字)记录到PictuerBox控件的TAG属性里,这样需要的时候可以通过TAG知道所需要的信息
这是vb2005的代码,你试一下,这是我以前做的一段代码,从库中读取到显示。
olecon = New OleDbConnection(constr)
olecon.Open()
Dim comm As New OleDbCommand("select 照片 from 表 where name='李三', olecon)
Dim reader As OleDbDataReader = comm.ExecuteReader
reader.Read()
Dim photofile() As Byte
photofile = reader.GetValue(0)
Dim streamph As New MemoryStream(photofile)
PictureBox1.Image = Image.FromStream(streamph)
这段代码是我从我做的小软件中截出来的,我在2005中就用着,2005是通过的,不知道加到2010中能否执行。
-------------------------------
根据你的发的图,我看了,好像你从库中取出的不是一条记录呀,我的代码只能取一条记录的情况,你的明显取出多条记录,代码只认最后一条,你的文件长度为0,当然不行了
select 照片 from 表 where name='李三',这条语句只能取出单条记录,且ole字段中确定有文件存在的,而且是图片格式才能显示
-------------------------------------------------------
Dim streamph As New MemoryStream(photofile)
你的是 Dim streamph = New MemoryStream(photofile)
这句你的和我的不一样,是不是这里的问题,2010没用过,要是还不行,我也不知道了
应该是边界溢出了,因为默认是0开始,所以 PictureBox1.Image.Width-1
同理PictureBox1.Image.Height - 1,不然行循环也会溢出
你这个不打开是什么意思
至少要用 Bitmap 类把图像加载吧,不然不太可能。