VB.NET打开两个excel文件的问题

时间:2021-01-02 13:58:56
请教各位,我使用的是VS2010,打开选中的文件后,发现第二个文件路径变成第一个文件的路径了,

TextBox5.Text 这里边的字符串变成了 TextBox4.Text
谁知道怎么解决?
VB.NET打开两个excel文件的问题

FilePathName_BOM = TextBox4.Text
            FilePathName_Caigou = TextBox5.Text

            excelApp = CType(CreateObject("excel.application"), Excel.Application)
            excelApp.Visible = False
            excelBook1 = excelApp.Workbooks.Open(FilePathName_BOM)  '打开选中的文件,原始文件
            excelSheet1 = CType(excelBook1.Worksheets(1), Excel.Worksheet)
            excelRows1 = excelSheet1.UsedRange.Rows.Count  '读取文件中的行数
            excelClos1 = excelSheet1.UsedRange.Columns.Count '读取文件中的列数


            excelBook2 = excelApp.Workbooks.Open(FilePathName_Caigou)  '打开选中的文件,采购清单
            excelSheet2 = CType(excelBook2.Worksheets(1), Excel.Worksheet)
            excelRows2 = excelSheet2.UsedRange.Rows.Count  '读取文件中的行数
            excelClos2 = excelSheet2.UsedRange.Columns.Count '读取文件中的列数

3 个解决方案

#1


自己搜代码啊,找出 TextBox5 的所有调用,看哪里给 TextBox5.Text 赋值了,就下断点。
调试过程中每次碰到断点,都仔细分析一下这次赋值是否正确。

#2


你点的哪个选择啊?那就是那里的代码有问题呗,OpenFileDialog返回值错误赋值给了另一个文本框。这编码也醉了,不能命名一下么,怪不得搞混。

#3


VB.NET打开两个excel文件的问题

#1


自己搜代码啊,找出 TextBox5 的所有调用,看哪里给 TextBox5.Text 赋值了,就下断点。
调试过程中每次碰到断点,都仔细分析一下这次赋值是否正确。

#2


你点的哪个选择啊?那就是那里的代码有问题呗,OpenFileDialog返回值错误赋值给了另一个文本框。这编码也醉了,不能命名一下么,怪不得搞混。

#3


VB.NET打开两个excel文件的问题