WinCC中MSFlexGrid控件编程程序

1、MSFlexGrid总行数和总列数的定义：MSFlexGrid1.Rows =5 规定表格的总行数为5行MSFlexGrid1.Cols = 2 规定表格的总列数为2行MSFlexGrid某一单元格的文本内容MSFlexGrid1.TextMatrix(3, 0) =网站地址 定义第3行的左边表头文本内容为：“网站地址”MSFlexGrid1.TextMatrix(3, 2) = 定义第3行第2列的文本内容为：“”右键选中MSFlexGrid的Private Sub MSFlexGrid1_MouseDown(Button As Integer, S

2、hift As Integer, x As Single, y As Single)If Button = vbRightButton ThenMSFlexGrid1.Row = y / MSFlexGrid1.RowHeight(0) - 0.5MSFlexGrid1.RowSel = MSFlexGrid1.Row右键选种当前行-备用u3u3：MSFlexGrid1.Col = 0MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1右键选种当前单元格-备用u3u3：MSFlexGrid1.Col = x / MSFlexGrid1.ColWidth(0) -

3、0.5MSFlexGrid1.Col = MSFlexGrid1.ColText1.Text = MSFlexGrid1.TextEnd IfEnd SubMSFlexGrid的单元格被点击时的事件Private Sub MSFlexGrid1_EnterCell() MSFlexGrid1.CellBackColor = vbBlue 被点中MSFlexGrid的单元格背景变兰色 MSFlexGrid1.CellForeColor = vbWhite 字体变白色End SubMSFlexGrid的单元格失去光标后的事件Private Sub MSFlexGrid1_LeaveCell() M

4、SFlexGrid1.CellBackColor = vbWhite MSFlexGrid1.CellForeColor = vbBlueEnd Sub使MSFlexGrid的单元格内容可编辑前提：新建两个text文本框，分别为text1和text1=从这里开始，使单元格可以编辑Private Sub MSFlexGrid1_EnterCell() MSFlexGrid1.CellBackColor = vbBlue MSFlexGrid1.CellForeColor = vbWhite Text1.Text = MSFlexGrid1.Text Text1.SelStart = 0 Text

5、1.SelLength = Len(Text1.Text)End SubPrivate Sub MSFlexGrid1_LeaveCell() MSFlexGrid1.CellBackColor = vbWhite MSFlexGrid1.CellForeColor = vbBlueEnd SubPrivate Sub Text1_Change() MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, MSFlexGrid1.Col) = Text1.TextEnd SubPrivate Sub Text2_Change() 修改表头 Dim r, c As Inte

6、ger r = MSFlexGrid1.Row c = 0 MSFlexGrid1.TextMatrix(r, 0) = Text2.TextEnd SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyLeft, vbKeyRight, vbKeyUp, vbKeyDown KeyCode = 0 End SelectEnd Sub=使单元格可以编辑，到此结束MSFlexGrid选中整行和整列右键点MSFlexGrid控件，选“属性/样式”，把“合并单元

7、格”选择为：“0 - Never”然后运行程序，就会发现MSFlexGrid可以自由选择整行或整列了！MSFlexGrid插入行Private Sub Command1_Click()If MSFlexGrid1.Rows 2 ThenMSFlexGrid1.AddItem AAA & vbTab & bbbElseMSFlexGrid1.AddItem asdas & vbTab & bbb, 2 这里的数字2表示在第2行处插入行End IfEnd SubMSFlexGrid删除行 MSFlexGrid1.RemoveItem 3 删除第三行。该方法无法删除第一行。如果

8、发现删不了。那一定是你的其他代码写错或冲突了u3u3复制MSFlexGrid单元格的文本内容Clipboard.SetText MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, MSFlexGrid1.Col)以上内容由u3u3编写测试转载请注明来自:=以下内容来自网络MSFlexGrid属性类型说明AllowBigSelectorBoolean返回/设置一个值,定义当在行或列的头部单击时,是否该行或列将整个被选中 AllowUseResizingEnum设置/返回一个值,定义用户是否可以调整网格行,列的尺寸 BackColorOle

9、_Color设置/返回一网格中非固定单元的背景色 BackColorBandArray/Ole_Color设置/返回网格中每个独立BAND的背景色 BachColorBkgOle_Color设置/返回网格的背景色(单元头部除外) BackColorFixedOle_Color设置/返回网格中固定单元的背景色 BackColorHeaderArray/Ole_Color设置/返回网格头部单元的背景色 BackColorIndentArray/Ole_Color设置/返回网格中凹痕部分的背景色 BackColorSelOle_Color设置/返回网格选中单元的背景色BackColorUnpopul

10、atedOle_Color设置/返回网格非用户操作区的背景色 BandDataArray/Long为独BAND设置/返回任意的值,以合在代码中通过这些值确定BAND BandDisplayEnum定义在网格中BAND是水平还是垂直显示 BandExpandableARRAY/BOOLEN设置/返回值指明独立的BAND能否被折叠或展开 BandIndentArray/Long定义BAND划分的字段数量 BandLevelLong返回当前的单元包含的BAND总数量 BandsLong返回网格中BAND总数量 CellAlignmentInteger设置/返回一个值以定义当前单元的水平和垂直对齐方式

11、 CellBackColorOle_Color定义当前单元的字体是否为粗体 CellFontBoldBoolean定义当前单元的字体是否为粗体 CellFontItalicBoolean定义当前单元的字体是否为斜体 CellFontNameString定义当前单元的字体名 CellFontSizeString定义当前单元的字体大小 CellFontStrikeThoughBoolean定义当前单元的字体是否为突显示 CellFontUnderlineBoolean定义当前单元的字体是有下划线 CellFontWidthSingle定义当前单元的字体宽(用点表示) CellFontColorOl

12、e_Color设置/返回当前单元格的前景色 CellHeightLong设置/返回当前单元格的高度 CellLeftLong返回当前单元格的左边距 CellPictureStdPicture设置/返回当前单元格的图片 CellPictureAlignmentInteger设置/返回当前单元格或某范围的单元格的图像对齐方式 CelltextStyleEnum设置/返回当前单元或选中范围单元文本的3D风格 CellTopLong返回当前单元格的垂直位置 CellTypeEnum设置/返回当前单元格的类型(标准.固定) CellWidthLong返回/设置当前的单元的宽度 ClipString设置/

13、返回网格选定范围单元的内容 ColArray/Integer设置/返回当前单元的水平坐标 ColAlignmentArray/Integer设置/返回当前列的对齐方式 ColalignmentBandArray/Integer设置/返回BAND数据列的对齐方式 ColAlignmentFixed Array/Integer设置/返回固定单元数据的对齐方式 ColAlignmentHeaderArray/Integer设置/返回固定头部单元数据的对齐方式 ColDataAyyay/Long为独立列设置/返回任意的值,以合在代码中通过这些值确定列 ColHeaderArray/Enum定义每个BA

14、ND头部是否显示 ColHeaderCaptionArray/Single定义每个BAND的列头部显示的文本 ColIsVisibleARRAY/BOOLEN返回/设置某个列是否可见 ColPosArray/Long返回某个给定列的左上角和网格左上角的距离 ColpositionArray/Long设置网格列的位置 ColsLong返回/设置网格的列数量 ColSelArray/Long设置/返回某个范围单元的起始列 ColWidthArray/Long设置/返回某个列的宽度 ColWordWrapOption Array/Integer设置/返回网格的非固定单元是否允许WRAP ColWor

15、dWrapOptionBandArray/Integer定义网格的BAND是否允许WRAP ColWordWrapOptionFixedArray/Integer定义列的固定单元是否允许WRAP ColWordWrapOptionHeaderArray/Integer定义各头部是否允许WRAP DataFieldArray/Single一个独立列绑定的数据库字段 FillStyleEnum定义改变文本或单元的其他属性是影响所有的选中单元还是只影响活动单元 FixedColsLong设置/返回固定列的列数 FixedRowsLong设置/返回固定行的行数 FocusRectEnum定义控件对当前

16、单元的焦点表示 FontStdFont返回/设置默认字体或各单元使用的字体 FontBandArray/StdFont设置/返回各BAND使用文本的字体 FontFixedSingle设置/返回固定单元使用的字体 FontHeader Array/StdFont设置/返回各头部使用的字体 FontWidthSingle设置/返回默认字体宽度 FontWidthBandArray/Single设置/返回BAND使用的字宽 FontWidthFixedSingle设置/返回固定单元使用的字宽 FontWidthHeaderArray/Single设置/返回每个头部使用的字宽 ForeColrOle

17、_Color设置/返回网格非固定单元使用的前景色 ForeColorBandArray/Ole_Color设置/返回网格各BAND的前景色 ForeColorFixedOle_Color设置/返回网格固定单元的前景色. ForeColorHeaderArray/Ole_Color设置/返回网格头部单元的前景色 ForeColorSelOle_Color设置/返回设置单元的前景色 FormatStringString定义一个格式串用来设置网格列的宽度,对齐方式,固定行文本固定列文本 GridColorOle_Color设置/返回网格单元间的线的颜色 GridColorBandArray/Ole_

18、Color设置/返回网格BAND的线的颜色 GridColorFixedOle_Color设置返回网格固定单元间的线的颜色 GridColorHeaderArray/Ole_Color设置/返回网格头部间的线的颜色 GridColorIndentOle_Color设置/返回网格INDENT单元间的线的颜色 GridColorUnpopulatedOle_Color设置/返回网格UNPOPULATED区域间的颜色 GrigLineEnum定义网格单元间的线的类型 GrigLinesBandArray/Enum定义网格各BAND间的线的类型GrigLinesFixedEnum定义网格固定单元的线的

19、类型 GrigLinesHeaderArray/Enum定义网格各头部间的线的类型 GrigLinesIndentArray/Enum定义网格INDENT单元间的线的类型 GrigLinesUnpopulatedEnum定义网格UNPOPULATED区域间的线的类型 GrigLinesWidthInteger设置/返回网格单元间的线的宽度 GrigLinesWidthBandArray/Integer设置/返回网格各BAND间的线的宽度 GrigLinesWidthFixedInteger设置/返回网格固定单元间的线的宽度 GrigLinesWidthHeaderArray/Integer设置

20、/返回网格各头间的线的宽度 GrigLinesWidthIndentArray/Integer设置/返回网格INDENT单元间的线的宽度 GrigLinesWidthUnpopulatedInteger设置/返回网格UNPOPULATED区域间的宽度 HieghtEnum定义如何以及何时高亮度显示网格的选中单元 LeftColLong网格最械的可见列 MergeCellsEnum设置/返回一个值表明如何及何时将有相同内容的记录进行合并 MergeColARRAY/BOOLEN设置/返回一个值表明哪些列可以将内容合并 MergeRowARRAY/BOOLEN设置/返回一个值表明哪些行可以将内容合

21、并 MouseColLong返回鼠标光标的列坐标位置 MouseRowLong返回鼠标光标的行坐标位置 PictureStdPicture返回MSHFLEXGRID的控件快照 PictureTypeEnum设置/返回PICTURE类型 RedrawBoolean设置/返回一个值,表明MSHFLEXGRIDR控件是否在每个改变后重画 RowLong设置/返回当前单元的垂直坐标 RowDataArray/Long为各行设置/返回任意的值,以合在代码中通过这些值确定行 RowExpandableBoolean定义当前行是否可以展开 RowExpandedBoolean返回一个值表明当前行是否展开 R

22、owHeightArray/Long设置/返回各行的高度 RowHeightMinLong设置/返回网格中行的最小高度 RowIsVisibleARRAY/BOOLEN设置/返回一个值,表明某个特定列是否可见 RowPosArray/Long返回给定行左上角和MSHFLEXGRID控件左上角的距离 RowPositionArray/Long设置某个网格行的位置 RowsLong返回网格的行的总数或者或BAND的行的总数 RowSelLong设置/返回一个范围的单元的起始行 RowSizingModeEnum设置/返回一个值表明对一行的设置是影响网格的所有行还是只影响被调整的行 ScrollBa

23、rsEnum设置/返回一个值表明MSHFLEXGRID控件的滚动条类型 ScrollTrackBoolean设置/返回一个值表明网格内容是在用户移动滚动条时随着改变还是滚动结束后改变 SelectionModeEnum设置/返回一个值表明MFHFLEXGRID控件允许的选择类型. SortEnum根据某些村准备设置排序的值 TextString设置/返回一个单元或一个范围内单元的文本内容 TextArrayarray/string不改变ROW,COL属性,设置/返回任意单元的文本内容 TextMatrixarray/string设置/返回某个选定行,列的单元的文本内容 TextStyleEnu

24、m设置/返回网格通常单元的3D文本风格 TextStyleBandArray/Enum设置/返回网格BAND的3D文本风格 TextStyleFixedEnum设置/返回网格各固定行的3D文本风格 TextStyleHeaderArray/Enum设置/返回网格各头部的3D文本风格 TopRowLong设置/返回网格最上面的可见行 VersionInteger返回正在使用MSHFLEXGRID控件的版本 WordWrapBoolean定义当到达单元的边界时,网格的单元的内容是否WRAP2) MSHFLEXGRID控件的重要方法 方法说明 AddItem向网格中加入一新行 Clear清除网格中的内容 ClearStructure清除网格的结构(映射信息) CollapseAll折叠网格的某个特定的所有行 ExpandAll展开网格的某个特定的所有行 RemoveItem从网格中清除一行 方法AddItem和RemoveItem可以用来向网格中加入或删除行(BANDS).如果折叠或展开某个BAND的所有行