/// <summary> /// 打开用于绘图的Excel程序,并进行界面设计 /// </summary> /// <returns></returns> /// <remarks></remarks> private Microsoft.Office.Interop.Excel.Worksheet GetDrawingSheet() { Microsoft.Office.Interop.Excel.Application app = default(Microsoft.Office.Interop.Excel.Application); Microsoft.Office.Interop.Excel.Workbook wkbk = default(Microsoft.Office.Interop.Excel.Workbook); Microsoft.Office.Interop.Excel.Worksheet sht = default(Microsoft.Office.Interop.Excel.Worksheet); //获取绘图的Application对象 ClsDrawing_ExcavationElevation ElevationDrawing = GlobalApp.ElevationDrawing; if (ElevationDrawing == null) { app = new Microsoft.Office.Interop.Excel.Application(); } else { app = ElevationDrawing.Application; } app.Visible = false; //获取绘图的工作簿 Microsoft.Office.Interop.Excel.Workbooks wkbks = app.Workbooks; if (wkbks.Count == 0) { wkbk = wkbks.Add(); } else { wkbk = wkbks.Item(1); } //获取绘图的工作表 sht = wkbk.Worksheets.Add(); sht.Activate(); //'绘图的标题 //Static DrawingNum As Integer = 0 //DrawingNum += 1 //app.Caption = "绘图" & DrawingNum.ToString //sht.Name = "绘图" & DrawingNum.ToString //' // return(sht); }