2024年5月5日发(作者：)

用微软网格控件进行编辑输入

Visual Basic中提供了许多标准控件和定制控件，每一个控件都可以提供一组特殊的

用户界面和编程能力。充分利用每一个控件的特性和方法，可以使编程工作更加容易、简

单。

微软网格控件MSFlexGrid是个定制控件。使用微软网格控件，可以按行列顺序显示

正文、数字和图片，就象电子表格一样。网格的高度、宽度和其它特性都可以进行调整，

而且网格的行和列可以单个地或成组地进行操作。MSFlexGrid控件对包含在内的单元内

容可进行分类、合并以及格式化，并且可以与数据库控件相绑定。MSFlexGrid控件具有

50多种属性，比其它网格控件功能更强大，灵活性更强。

但是MSFlexGrid控件同其它Grid网格控件一样，用户不能编辑网格单元中的内容，

在要求对其内容进行修改时，这可能是一个缺陷。虽然可以对DBGrid控件进行编程完成

编辑的功能，但其功能不如MSFlexGrid强大。当在录入工作量比较大时，如果利用

MSFlexGrid进行输入，代替Text或其它控件，从而避免了界面的反复刷新和不断地操作

按钮，录入速度和效率会得以大大提高。

在应用程序中使用 MSFlexGrid 之前，应先将 文件添加到工程中。

实现编辑网格单元的方案

为了仅仅要求实现能够对网格单元进行输入，可以在MSFlexGrid的KeyPress事件中

加入以下代码，但是修改编辑输入后的内容还十分困难。

Sub MSFLexGrid1_KeyPress(KeyAscii As Integer)

= & Chr$(KeyAscii)

End Sub

另外一种方法是文本框和网格相结合，用户编辑操作文本框中的内容，操作完后移至

网格单元中。在这个过程中，应该实现以下几个功能：

（1）文本框能准确定位，与待编辑网格单元相重合（2）平时文本框不显示，当进行

编辑操作时显示（3）在输入完一行后能自动判断并加一新行（4）按回车键确认并自动到

下一列（5）双击网格单元可显示文本框进行编辑（6）文本框消失后，把文本框内容移到

网格单元中。

编辑网格单元的具体实现

建立一个新工程，在Form1上添加控件 Text1和MSFlexGrid1，根据表1设置其属

性。

表1 表单Form1的对象和属性对象属性设置

Text1VisibleFalseText“”MSFlexGrid1Rows2Cols

FixedCols0FixedRows1

根据字段数目自行设置

首先要实现文本框显示的时候，能与网格单元准确重合。ShowTextBox子例程便可以

实现此功能。在此考虑网格本身的Top和Left值、网格单元的高度和宽度、分隔网格单元

的边框的宽度。