如何popup保存或打开文件VB.Net

我的目标是试图popup保存或打开已经创build的文件的选项。

这是我的代码：

Dim xlApp As Excel.Application Dim xlWorkBook As Excel.Workbook Dim xlWorkSheet As Excel.Worksheet Dim misValue As Object = System.Reflection.Missing.Value xlApp = New Excel.ApplicationClass xlWorkBook = xlApp.Workbooks.Add(misValue) xlWorkSheet = CType(xlWorkBook.Sheets("sheet1"), Excel.Worksheet) xlWorkSheet.Cells(1, 1) = "PERIOD" xlWorkSheet.Cells(1, 2) = "PARTS_NO_FG" xlWorkSheet.Cells(1, 3) = "QTY_ASSY" xlWorkSheet.Cells(1, 4) = "COSTING1" xlWorkSheet.Cells(2, 1) = "201212" xlWorkSheet.Cells(2, 2) = "01125E6041" xlWorkSheet.Cells(2, 3) = "5" xlWorkSheet.Cells(2, 4) = "0" xlWorkSheet.SaveAs("D:\TemplateAssy.xlsx") xlWorkBook.Close() xlApp.Quit() releaseObject(xlApp) releaseObject(xlWorkBook) releaseObject(xlWorkSheet) 

那么如何在VB.NET执行这个程序的时候popup来，谢谢

Answer 1

只需打开警报。 它应该解决这个问题

  Application.DisplayAlerts = True workbook.SaveAs(filePath) Application.DisplayAlerts = True 

资料来源： http : //p2p.wrox.com/vb-how/63900-disabling-second-excel-save-prompt.html

来自shasur的回答

编辑：在你的情况

  xlApp.DisplayAlerts = True xlWorkbook.SaveAs(filePath) xlApp.DisplayAlerts = True 

另外尝试xlApp.Visible = True

可能能够给你指出哪里/为什么它不显示。