qq_21132665
2021-01-09 15:59
采纳率: 0%
浏览 51

求教!VB.NET向表格中写入内容

使用VB.NET现在编写的程序,在运行时。向表格中写入内容,运行速度很慢,用什么方式可以提高写入速度。

如:将数字123写入D盘根目录的"测试.xls"表格中的A1单元格,代码应如何写,才能使运行速度最快。(只是举个例子。)

  • 写回答
  • 好问题 提建议
  • 关注问题
  • 收藏
  • 邀请回答

5条回答 默认 最新

  • SoftwareTeacher 2021-01-09 16:02

    你现在是怎么写的? 速度是多少?

    评论
    解决 无用
    打赏 举报
  • qq_21132665 2021-01-09 16:12

                Dim AppXls As Microsoft.Office.Interop.Excel.Application    
                Dim AppWokBook As Microsoft.Office.Interop.Excel.Workbook   
                Dim AppSheet As New Microsoft.Office.Interop.Excel.Worksheet    

                AppXls = New Microsoft.Office.Interop.Excel.Application    
                AppXls.Workbooks.Open(Label2.Text & "\" & "不动产登记申请书" & dr(0) & ".xls")             
                AppXls.Visible = False                                    

                AppWokBook = AppXls.Workbooks(1)         
                AppSheet = AppWokBook.Sheets("第1页")     

    --------------------写入值过程

    AppXls.Workbooks(1).Sheets("第1页").Range("AC38").Value = “写入值”

                AppXls.ActiveWorkbook.Close(SaveChanges:=True)
                AppXls.Quit()

    评论
    解决 无用
    打赏 举报
  • qq_21132665 2021-01-09 16:12
                Dim AppXls As Microsoft.Office.Interop.Excel.Application    
                Dim AppWokBook As Microsoft.Office.Interop.Excel.Workbook   
                Dim AppSheet As New Microsoft.Office.Interop.Excel.Worksheet    
    
                AppXls = New Microsoft.Office.Interop.Excel.Application    
                AppXls.Workbooks.Open(Label2.Text & "\" & "不动产登记申请书" & dr(0) & ".xls")             
                AppXls.Visible = False                                    
    
                AppWokBook = AppXls.Workbooks(1)         
                AppSheet = AppWokBook.Sheets("第1页")     
    
    '--------------------写入值过程
    
    AppXls.Workbooks(1).Sheets("第1页").Range("AC38").Value = “写入值”
    
                AppXls.ActiveWorkbook.Close(SaveChanges:=True)
                AppXls.Quit()
    评论
    解决 无用
    打赏 举报
  • qq_21132665 2021-01-09 16:15

    现在以上那样写的。我是从数据库获取的值,然后写入到excel表格中,使用SQL语句获取MDB库中的内容运行速度很快,就是将获取的内容写入到表格中,运行就会比较慢。不知是否有其他方法可以提高运行速度,我水平比较低,麻烦大神指点一二。

    评论
    解决 无用
    打赏 举报
  • enmity 2021-01-10 04:49
    评论
    解决 无用
    打赏 举报

相关推荐 更多相似问题