دوست عزیز شما اگه با خود Report Designer ویژوال بیسیک 6 گزارشاتت رو طراحی کنی می تونی به کنترل های استفاده شده در اون ها دسترسی داشته باشی.مثال زیر رو در نظر بگیر:
Dim dbConn As New ADODB.Connection
Dim dbRS As New ADODB.Recordset
dbConn.Open "ConnectionString"
dbRS.Open "QueryString", dbConn, adOpenKeyset, adLockReadOnly
If Not dbRS.RecordCount = 0 Then
With DataReport1.Sections("Section2").Controls
Set .Item("PictureBox1").DataSource = dbRS
.Item("PictureBox1").DataField = "DataField"
.Item("PictureBox1").Refresh
End With
End If
dbRS.Close
dbConn.Close
در اینجا ConnectionString رشته اتصال به پایگاه داده،QueryString رشته شرط پر کردن رکوردست و DataField هم نام فیل مورد نظرتون هست.بقیه کد هم دیگه مشخصه.اینرو هم باز باید به خاطر داشته باشی که فیلدی که قرار هست به کنترل PictureBox انتساب بدی باید از نوع OLEDB باشه و فایل تصویر رو بصورت Binary در اون ذخیره کرده باشی.
موفق باشی.