VB.NET Word创建表格并录入文字

创建如图的表格,谢谢... 创建如图的表格,谢谢 展开
 我来答
yfv2000
推荐于2016-07-28 · TA获得超过194个赞
知道小有建树答主
回答量:238
采纳率:0%
帮助的人:264万
展开全部
‘首先,创建一个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
追问
第二行的合并是否这样
DTbl.Cell(2, 2).Select()
DWrd.Selection.MoveRight(, 2, SelectionMode.MultiExtended)
DWrd.Selection().Cells.Merge()
Jack4DotNet
2020-06-23 · TA获得超过128个赞
知道小有建树答主
回答量:218
采纳率:91%
帮助的人:31.2万
展开全部

添加spire.doc.dll为引用,再使用下面的代码

  1. '创建Word文档

  2. Dim doc As Document = New Document

  3. '添加section

  4. Dim section As Section = doc.AddSection


  5. '添加表格

  6. Dim table As Table = section.AddTable(true)


  7. '添加第1行

  8. Dim row1 As TableRow = table.AddRow

  9. '添加第1个单元格到第1行

  10. Dim cell1 As TableCell = row1.AddCell

  11. cell1.AddParagraph.AppendText("姓 名")

  12. '添加第2个单元格到第1行

  13. Dim cell2 As TableCell = row1.AddCell

  14. cell2.AddParagraph.AppendText("年 龄")


  15. '添加第2行

  16. Dim row2 As TableRow = table.AddRow(true, false)

  17. '添加第1个单元格到第2行

  18. Dim cell3 As TableCell = row2.AddCell

  19. cell3.AddParagraph.AppendText("约 翰")

  20. '添加第2个单元格到第2行

  21. Dim cell4 As TableCell = row2.AddCell

  22. cell4.AddParagraph.AppendText("21")

  23. table.AutoFit(AutoFitBehaviorType.AutoFitToWindow)


  24. '保存文档

  25. doc.SaveToFile("Table2.docx")

已赞过 已踩过<
你对这个回答的评价是?
评论 收起
智爷涵子
2014-08-07 · 超过45用户采纳过TA的回答
知道小有建树答主
回答量:94
采纳率:0%
帮助的人:61.3万
展开全部
试试Datagrid控件
追问
详情
追答
可以直接在属性栏中添加行和列(貌似是row和column属性),之后可以使用 [控件名](i,j) 来操控单元格的各项属性,包括背景、内容等
当然最简单的方法可以直接用textbox
也可以研究下vb6中导入word文件的相关技术,不知.net中是否还有
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式