ShowFileOpenDialog

In Module PicMain


    Too many parameters: ShowFileOpenDialog
    Line too long: 296
    Optional parameter never passed a value: InitialDir
    Optional parameter never passed a value: FilterIndex
    Optional parameter never passed a value: Flags
    Optional parameter never passed a value: DialogTitle
 117 Public Function ShowFileOpenDialog(ByVal hwndOwner As Long, ByVal DefaultExtension As String, ByVal Filter As String, Optional ByRef FilterIndex As Long, Optional ByVal InitialDir As String, Optional ByVal DialogTitle As String, Optional ByRef Flags As EFileDlgFlags = OFN_OPENDEFAULTS) As String
 118 ' Show the Open file dialog box using comdlg32.dll
 119 ' [hwndOwner] In. Window handle of owner window. Can be zero.
 120 ' [DefaultExtension] In. Default file extension such as "txt".
 121 ' [Filter] In. Filters in format "File type|*.ext;*.txt|All files|*.*".
 122 ' [FilterIndex] In/out. Selected file type in filter. First filter is number 1.
 123 ' [InitialDir] In. Initial directory. If not given or empty, uses system default initial directory. See FileDialog for explanation.
 124 ' [DialogTitle] In. Dialog caption. If not given or empty, uses system default caption.
 125 ' [Flags] In/out. Flags for the dialog. Should be given as "OFN_OPENDEFAULTS or ...". On return contains any altered flags.
 126 ' Return value:
 127 ' Selected file name if user pressed OK
 128 ' Empty string if user pressed Cancel or there was an error
 129 ' Caller can verify error status by calling CommDlgExtendedError
 130 
 131 ShowFileOpenDialog = FileDialog(hwndOwner, DefaultExtension, Filter, FilterIndex, InitialDir, DialogTitle, Flags)
 132 
 133 End Function
 134 

Called by

OpenFile_Click in Form PicForm

Calls

> FileDialog