GetOpenFileName function call

Using the "GetOpenFileName in my Access 2.0 application seems to work fine.  After converting over to Access 97, I made what I belive to be the appropriate changes and now I don't get any compile errors or run-time errors, but the function is not working correctly.  When I step through the code and execute the function call, it returns a 0 and DOES NOT display a dialog box for the user to pick a file, but it doesn't error out.  Here is exactly what I've got in code...

In a module....

Type OPENFILENAME
        lStructSize As Long
        hwndOwner As Long
        hInstance As Long
        lpstrFilter As String
        lpstrCustomFilter As String
        nMaxCustFilter As Long
        nFilterIndex As Long
        lpstrFile As String
        nMaxFile As Long
        lpstrFileTitle As String
        nMaxFileTitle As Long
        lpstrInitialDir As String
        lpstrTitle As String
        flags As Long
        nFileOffset As Integer
        nFileExtension As Integer
        lpstrDefExt As String
        lCustData As Long
        lpfnHook As Long
        lpTemplateName As String
End Type

Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long

In obj_click sub....

Dim file As OPENFILENAME
Dim response As Variant

response = GetOpenFileName(file)


I'm having trouble debugging this since I don't see what the error is.