czjt1234 当前离线
上尉
TOP
Set objDialog = CreateObject("SAFRCFileDlg.FileSave") objDialog.FileName = "test" objDialog.FileType = ".txt"复制代码
Set objDialog = CreateObject("UserAccounts.CommonDialog") objDialog.Filter = "VBS File|*.vbs"复制代码