private static extern bool GetSaveFileName(ref OPENFILENAME lpofn);

Private Shared Function GetSaveFileName(ByRef lpofn As OPENFILENAME) As Boolean

    Declare Auto Function GetSaveFileName Lib "Comdlg32.dll" ( _

    If LibWrap.GetSaveFileName(ofn) Then

    ''' When the GetOpenFileName or GetSaveFileName function returns successfully,

    ''' The GetOpenFileName and GetSaveFileName functions return FALSE if the buffer is

    ''' The default extension. GetOpenFileName and GetSaveFileName append this extension to the file name if the user fails to type an extension.