Question

好日子先生。我试图从我的访问数据库中检索照片，然后将其加载到PictureBox中，但我遇到了这种无法解决的问题。我见过类似于我的问题，但我不能理解别人给出的解决方案，因为我只是一个新手。有人请帮我纠正我的代码，从访问数据库中检索图像文件。谢谢我正在使用Access数据库和Visual Basic 2010.

以下是代码：

Dim arrImage() As Byte
Dim myMS As New IO.MemoryStream
Dim da As New OleDb.OleDbDataAdapter("SELECT * 
                                      FROM tblEmp  
                                      WHERE EmployeeID= '" 
                                          & Me.txtID.Text 
                                          & "'", con)

Dim dt As New DataTable
da.Fill(dt)


If dt.Rows.Count > 0 Then
    If Not IsDBNull(dt.Rows(0).Item("Picture")) Then
        arrImage = dt.Rows(0).Item("Picture")
        For Each ar As Byte In arrImage
            myMS.WriteByte(ar)
        Next
        '
        inFrm.PictureBox1.Image = Image.FromStream(myMS)
    End If
End If

我得到＆＃34;参数无效＆＃34;行中的错误

inFrm.PictureBox1.Image = Image.FromStream(myMS)

Answer 1

尝试用此

替换代码行

inFrm.PictureBox1.PictureData = myMS.Read

VB 2010检索图像

1 个答案: