openfilename GetOpenFilename释放内存

VBA中如何用GetOpenFilename获取到文件名？Private sub CommandButtonuclick（）Dim strfile As String ...