成人AV在线无码|婷婷五月激情色,|伊人加勒比二三四区|国产一区激情都市|亚洲AV无码电影|日av韩av无码|天堂在线亚洲Av|无码一区二区影院|成人无码毛片AV|超碰在线看中文字幕

application對(duì)象的方法 如何在VB中,調(diào)用Excel.Application對(duì)象?

如何在VB中,調(diào)用Excel.Application對(duì)象?在項(xiàng)目中引用Microsoft Excel類型庫(kù):從“項(xiàng)目”菜單中選擇“引用”列,選擇“Microsoft Excel 11.0對(duì)象庫(kù)(Exc

如何在VB中,調(diào)用Excel.Application對(duì)象?

在項(xiàng)目中引用Microsoft Excel類型庫(kù):從“項(xiàng)目”菜單中選擇“引用”列,選擇“Microsoft Excel 11.0對(duì)象庫(kù)(Excel 2003)”,然后選擇“確定”。指示應(yīng)在項(xiàng)目中引用excel類型庫(kù)。DimxlAppAsExcel.ApplicationDimxlBookAsExcelB.工作BookDimxlSheetAsExcel.WorksheetDimFileName文件名,sheetnameastringfilename=“e: 數(shù)據(jù).xls“”excel文件名sheetname=”Sheet1“”表名setxlapp=CreateObject(”Excel應(yīng)用程序“”“創(chuàng)建excel對(duì)象setxlbook=xlApp.Workbooks.Open打開(kāi)(文件名)“打開(kāi)現(xiàn)有excel工作簿文件xlApp.Visible=真“Set”設(shè)置excel對(duì)象可見(jiàn)(或不可見(jiàn))setxlsheet=xlBook.工作表(sheetname)“設(shè)置活動(dòng)工作表”示例:xlSheet.單元格(5,2)=文本1。文本“分配文本2。文本到單元格B5=xlSheet.單元格(2,3)“取C2的值xlBook.關(guān)閉(true)“關(guān)閉工作簿”xlApp.退出“End excel object setxlapp=Nothing”釋放xlapp對(duì)象