Can't Show Non-Modal Form...

[Fedhax]

Private Sub Timer1_Timer()
 
    Dim lProcessID As Long
    Dim lID As Long
    
    Timer1.Interval = 0
    
    'get the process ID for prosper
    lProcessID = GetWindowThreadProcessId(Me.hWnd, lID)
    
    'close any open message boxes
    CloseMessageBox lProcessID
    
    Form2.Show   '<----- DANGER, WILL ROBINSON, DANGER
 
End Sub

My shot in the dark would be the Form2.Show call in the timer loop is directly causing the error. If you call CloseMessageBox and it doesn't successfully close the MsgBox, then then it will try to show Form2 and blow up.

Have you stepped through your code and made sure that it is closing the MsgBox where and when it should be closing?