前端设置3列不固定行表格_VB表格VSFlexGrid使用方法详解

VSFlexGrid控件用于创建一个表格，类似于excel的表格形式。对于显示大量数据，以及与用户实现交互，是非常必要和有用的控件。VSFlexGrid控件与数据库结合，可以实现非常强大的功能。

接下来，我们一起来学习VSFlexGrid控件常用的属性和方法，以及如何使用VSFlexGrid控件。(以下简称VS表格)

如何添加VSFlexGrid控件？

在工程-部件选项卡中找到componentOne VSFlexGrid 8.0 (OLEDB)选项，并勾选前方的复选框。单击确定按钮后，将其添加至工具箱中。

单击工具箱中的VSFlexGrid控件，并在窗体上绘制出VSFlexGrid表格。如下图。

常用的VS属性

1，Col和Row属性

该属性用于设置/返回当前光标在表格中的列和行的位置。通过这两个属性，可以将光标移动到一个指定的单元格。例如：

    VSFlexGrid1.Row = 3    VSFlexGrid1.Col = 2    VSFlexGrid1.Text = "这是(3,2)单元格"

以上代码先将光标移动到了(3,2)单元格，然后设置该单元格一个字符串值。

2，Cols和Row属性

返回/设置表格的总列数和总行数

    VSFlexGrid1.Rows = 20    VSFlexGrid1.Cols = 8

以上代码设置了表格的总行数为20行，总列数为8行。

3，FixedCols和FixedRows属性

返回/设置表格的固定列列数和固定行行数。

    VSFlexGrid1.FixedCols = 1    VSFlexGrid1.FixedRows = 2

以上代码设置了表格的固定列数为1列，而固定行行数为2列。

4，ColWidth和RowHeight属性

返回/设置指定列的宽度和指定行的高度

    VSFlexGrid1.RowHeight(0) = 500    VSFlexGrid1.ColWidth(0) = 800

以上代码设置了第一行的高度为500，第一行的宽度为800

5，Text属性

返回/设备当前光标所在单元格的文本内容

VSFlexGrid1.Text = "值"

6，TextMatrix属性

返回/设置指定单元格的文本内容

VSFlexGrid1.TextMatrix(2,1)="这是(2,1)单元格"

VS表格常用方法

1，AddItem()方法

该方法用来为表格增加新的一行

语法：

VSFlexGrid1.AddItem "值", [row]

例如：

VSFlexGrid1.AddItem "姓名", 5

以上代码在第5行处增加了新的一行，并且在第一个单元格的内容是"姓名"

2，RemoveItem()方法

移除指定行

语法：

VSFlexGrid1.RemoveItem [row]

例如：VSFlexGrid1.RemoveItem 5

以上代码删除了表格中的第5行。

实例演示

制作一个简单的学生成绩表。

步骤一：

设计程序界面，按照下图绘制窗体和控件

步骤二：

编写Form_Load事件代码，如下：

Private Sub Form_Load()    '初始化表格行列数为3列1行    VSFlexGrid1.Rows = 1    VSFlexGrid1.Cols = 3    '初始化表格固定行和列数    VSFlexGrid1.FixedCols = 1    VSFlexGrid1.FixedRows = 1    '设置表格各列的宽度    VSFlexGrid1.ColWidth(0) = 1000    VSFlexGrid1.ColWidth(1) = 1500: VSFlexGrid1.ColWidth(2) = 1500    '设置表格表头的内容    VSFlexGrid1.TextMatrix(0, 0) = "姓名"    VSFlexGrid1.TextMatrix(0, 1) = "语文成绩"    VSFlexGrid1.TextMatrix(0, 2) = "数学成绩"End Sub

窗体加载代码写好后，运行程序，查看是否是自己想要的效果。

步骤三：

编写添加按钮代码，如下所示：

Private Sub Command1_Click()    '在最后增加1行，且姓名列内容为text1文本框的值    VSFlexGrid1.AddItem Text1    '修改语文成绩列的内容    VSFlexGrid1.TextMatrix(VSFlexGrid1.Rows - 1, 1) = Text2    '修改数学成绩列的内容    VSFlexGrid1.TextMatrix(VSFlexGrid1.Rows - 1, 2) = Text3End Sub

运行程序，在三个文本框输入内容后，单击添加按钮，查看效果。

步骤四：

添加修改按钮的代码，如下：

Private Sub Command3_Click()

    VSFlexGrid1.TextMatrix(VSFlexGrid1.Row, 0) = Text1    VSFlexGrid1.TextMatrix(VSFlexGrid1.Row, 1) = Text2    VSFlexGrid1.TextMatrix(VSFlexGrid1.Row, 2) = Text3End Sub

运行程序，在三个文本框输入需要修改的新的内容，然后鼠标点击需要被修改的行。然后单击修改按钮。查看效果。

步骤五：

添加删除代码，如下所示：

Private Sub Command2_Click()    VSFlexGrid1.RemoveItem (VSFlexGrid1.Row)End Sub

步骤六：

综合测试，运行程序，逐一测试功能。

好了，本节课程关于VSFlexGrid表格控件就一起学习到这里，再见。

由于篇幅限制，VS表格中的很多属性和方法没有一一介绍，关于VSFlexGrid完整的属性介绍，请看上一篇文章。

跳转链接：VS表格属性大全