Hello all, I'm making an application when once the image is changed from (picImage), which is a PictureBox; the Picture from picImage is saved into Buffered Memory (stdPicture in my choice) to be used as Checkpoints incase the user decides to relay back to another one.

Here is parts of my code so far:

Code:
  Private History(255) As New StdPicture
  Private CurrentHistoryNumber As Long 'what history point we are at.

   Function MakeHistoryPoint(ByVal HistoryReason As String)
     If CurrentHistoryNumber& < 255 Then
      Set History(CurrentHistoryNumber&) = retrieveImage(picImage)
       CurrentHistoryNumber& = CurrentHistoryNumber& + 1
        lstHistory.AddItem HistoryReason$
     End If
   End Function

   Private Function retrieveImage(ByVal SrcDC As PictureBox) As StdPicture
    Dim tempPicture As New StdPicture
     Call BitBlt(testOBJ.Handle, 0, 0, SrcDC.Width, SrcDC.Height, SrcDC.hDC, 0, 0, vbSrcCopy)
      Set retrieveImage = tempPicture
   End Function
My code works and all, but it when I try to retrieve the image from the History it does not show anything, this is the code I use to show the image into another picturebox (picSnapshot):

Code:
  Call BitBlt(picSnapshot.hDC, 0, 0, History(lstHistory.ListIndex).Width, _
  History(lstHistory.ListIndex).Height, History(lstHistory.ListIndex), 0, 0, vbSrcCopy)
I do notice that History(?) whatever's value is always at 0, meaning no picture was copied or something...does anyone have any clue what i'm doing wrong? Thanks,

RsT