vb.net表格 vbnet表格

vb.net怎么使用表格控件？

DataGridView控件，放一个DataGridView1和Button1到窗体，下面是按钮下代码

成都创新互联提供网站设计制作、做网站、网页设计，成都品牌网站建设，1元广告等致力于企业网站建设与公司网站制作，10余年的网站开发和建站经验,助力企业信息化建设，成功案例突破数千家,是您实现网站建设的好选择.

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Me.DataGridView1.AllowUserToAddRows = False

DataGridView1.RowTemplate.Height = 200

DataGridView1.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.None

For i = 1 To 3

Me.DataGridView1.Columns.Add("列" i.ToString, "列" i.ToString)

Me.DataGridView1.Rows.Add()

Me.DataGridView1.Columns(0).Width = 100

Me.DataGridView1.Columns(1).Width = 500

Me.DataGridView1.Columns(0).Width = 300

End Sub

'自己设置相关需要的属性即可

1、首先打开excel工作表格。

2、其次用鼠标右键点击“标签栏”，选择“插入”。

3、最后选择里面“工作表”点击即可完成添加。

一般情况下先用EXCEL做好一个样表文件，设定好打印区域和样式，需要填内容的时候，先程序复制一个样表文件，然后调用API打开表格填写内容并打印，如果想用API来实现调整模板和打印预览，可能比较困难，而且很抽象，个人觉得费时费力效果还不一定理想

‘首先，创建一个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

分享文章：vb.net表格 vbnet表格
标题URL：http://scyanting.com/article/hihehs.html