Results 1 to 3 of 3
  1. #1
    Join Date
    Dec 2004
    Posts
    3

    Question Unanswered: Close Event error

    I have the following in a MS Access Database and it will not go past the 3rd to last line. I can't see the error - can someone point it out and how to fix.

    Private Sub Form_Close()
    Dim obj As Object

    Dim bln Remove As Boolean

    For Each obj in Shipping
    If obj.Hwnd = Me.hwnd Then
    blnRemove = True
    Exit For
    End If
    Next

    Set obj = Nothing
    If blnRemove Then
    shipping.Remove Cstr(me.hwnd) 'this is where my error is'
    End If
    End Sub

    Thanks
    RdcSoDak

  2. #2
    Join Date
    Dec 2004
    Location
    Netherlands
    Posts
    11
    'Dim bln Remove As Boolean'

    Remove the space between 'bln Remove' (=blnRemove) on that row!

  3. #3
    Join Date
    Dec 2004
    Posts
    3
    Quote Originally Posted by Tribal
    'Dim bln Remove As Boolean'

    Remove the space between 'bln Remove' (=blnRemove) on that row!
    That was just a typo in this forum. The space did not exist in my code. Thanks for the reply. Debugger always points out the Shipping.Remove Cstr(me.hwnd)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •