VB.NET获取Excel单元格的内容。

将xlBook调成Excel。练习本

将xlSheet调成Excel格式。工作表

将xlRange显示为Excel。范围

Dim strTmp As String = " "

xlApp = CreateObject("Excel。应用”)

xlBook = xlApp。Workbooks.Open(txtfileName。正文)

xlSheet = xlBook。工作表(1)

xlApp。可见=假

xlRange = xlSheet。单元格(1，1)

StrTmp = xlRange。' Value '读取第一行第一列的值，剩下的可以自己写。

xlApp。Application.Visible = False

xlBook。关闭()

XlApp = Nothing ' "将控制返回到Excel。

xlBook =无

xlSheet =无