DBPix Sample Source Code: fsubEditSubImage Back to sample
Option Compare Database
Private Sub DBPixSubMain_ImageModified()
' The main image has been changed update the thumbnail
If DBPixSubMain.ImageBytes > 0 Then
DBPixSubThumb.ImageLoadBlob (DBPixSubMain.Image)
Else
DBPixSubThumb.ImageClear
End If
End Sub
Back to sample
|