文件对话框API打开保存

ofn.lStructSize ＝ 76 ' 结构大小
ofn.flags ＝ 位或 (#OFN_ALLOWMULTISELECT, #OFN_EXPLORER) ' 可以多项选择
ofn.nMaxFile ＝ 255 ' 文件名缓冲区长度
ofn.lpstrFile ＝ 取空白文本 (254) ' 文件名缓冲区
' ofn.lpstrTitle ＝ “打开” ' 对话框标题
ofn.lpstrInitialDir ＝ 取当前目录 () ' 初始目录
ofn.nMaxFileTitle ＝ 255 ' 对话框标题长度
ofn.hwndOwner ＝ 取窗口句柄 () ' 所属窗口
' 文件过滤器 "音频文件(*.mp3)\0*.*\0\0"
ofn.lpstrFilter ＝ 到字节集 (“音频文件(*.mp3)”) ＋ { 0 } ＋ 到字节集 (“*.mp3”) ＋ { 0, 0 }
' 打开文件对话框
.如果 (GetSaveFileName (ofn) ＝ #TRUE) ' 如果文件已打开，返回真，否则返回假
' OutputDebugString(TRUE)
.否则
' OutputDebugString(FALSE)