锐客网

  1. 首页 > 睿知 > it技术 > >

关于vbnet表格实例的信息( 二 )

IT技术导出


For j = 0 To DataGridView1.Columns.Count - 1
excel.Cells(i + 2, j + 1) = DataGridView1(j, i).Value
Next
Next
excel.Workbooks(1).SaveCopyAs(filename) '保存
Me.Close()
End Sub
VB.NET Word创建表格并录入文字‘首先，创建一个VB.NET项目，再点击菜单”项目“-”添加引用“ ， 在”Com“-”类型库“里，选择Microsoft.Word 14.0 Object Library（对应Office版本为2010），将以下代码复制粘贴到Form1窗体替换原代码 。
’PS：以下代码仅创建表格，将第行2至4列合并，添加1个文字，其他的你自己分析 。
Imports Microsoft.Office.Interop
Imports Microsoft.Office.Interop.Word'引入Word
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim DWrd As New Word.Application, DDoc As Word.Document '定义Word及文档对象
DDoc = DWrd.Documents.Add '新增文档
Dim DTbl As Word.Table'定义表格对象
DTbl = DDoc.Tables.Add(DDoc.Range, 7, 4)'新增表格
DTbl.Style = "网格型"'表格的样式
DTbl.Cell(1, 2).Select()'选择起始单元格为第1行/第2列
DWrd.Selection.MoveRight(, 2, SelectionMode.MultiExtended)'向右扩展两个单元格(即选择第1行的第2至4列)
DWrd.Selection().Cells.Merge()'单元格合并
DTbl.Cell(1, 1).Range.Text = 1'在第1个单元格填写文本
DWrd.Visible = True '显示Word
End Sub
End Class
关于vbnet表格实例和的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

推荐阅读


上一篇：java源代码怎么移植到，java源代码怎么移植到数据库

下一篇：新时代虚拟主机，实现虚拟主机有哪些方式?