二进制图片?
Dim cmd As new SQLCommand
cmd.ConnectionName = "xxx"
cmd.CommandText="s elect 示意图 from ZL_SKU where SKU编码='" & cur("产品编号") & "'"
Dim dt As DataTable = cmd.ExecuteReader
Dim src As String
If dt.DataRows.Count >0 Then
Dim imagebytes As Byte() = dt.DataRows(0)("示意图")
Dim stream As System.IO.Stream = New System.IO.MemoryStream(imagebytes)
Dim bmp As System.Drawing.Bitmap = New System.Drawing.Bitmap(stream)
e.Form.Controls("PictureBox1").Image = bmp
End If