MSFlexGrid控件的相关介绍

来源：互联网发布：php微信菜单消息推送编辑：程序博客网时间：2024/04/29 08:10

在工程—部件—控件中选择MicrosoftFlexGrid Control version 6.0 可以添加MSFlexGrid控件。

它作用是显示和操作表格数据，对包含字符串和图片的表格提供灵活的排序、插入数据和格式编排功能，当与Data控件绑定时，就只显示只读数据。可在其中任何单元放置文本、图片或两者，Row属性确定其列数，Col确定其行数。要在单元中显示多行文本，需增大宽度（ColWidth属性）或行高度（ColHeight）

下面是有关它的个别具体代码操作：

1.在MSFlexGrid中取某一单元格数据：

Private Sub MSFlexGrid1_Click()

MsgBoxMSFlexGrid1.TextMatrix(MSFlexGrid1.Row, MSFlexGrid1.Col), vbOKOnly,"提示消息"

End Sub

2.在单元格中插入背景图片：

Set MSFlexGrid.CellPicture=LoadPicture("图片物理位置")

3.在单元格中插入文本：

MSFlexGrid.textMatrix(Col,Row)="文本"

4添加新的一行：（AddItem方法）

Dim row asstring

row="AAA" & btab &"bbb"

MSFlexGrid1.addItem row

5.怎么实现MSFlexGrid控件单行背景为白色，双行为蓝色（或其他颜色）：

Dim I asInteger

With MSFlexGrid1

.AllowBigSelection=True '设置网格样式

.FillStyle=flexFillRepeat

For i=0 To.Rows-1

.Row = i: .Col = .FixedCols

.ColSel = .Cols() - .FixedCols - 1

If i Mod 2 = 0 Then

.CellBackColor = &HC0C0C0 ’浅灰

Else

.CellBackColor = vbBlue ’兰色

End If

Next i

End With

6.MSFlexGrid控件如何移到最后一行

MSFlexGrid1.TopRow = MSFlexGrid1.Rows –1

7.如何判断msflexgrid有无滚动条

Declare Function GetScrollRange Lib "user32" (ByVal hWnd As Long, ByVal nBar As Long, lpMinPos As Long, lpMaxPos As Long) As Long

Public Const SB_HORZ = &H0

Public Const SB_VERT = &H1

Public Function VsScroll(MshGrid As MSHFlexGrid) As Boolean ’判断水平滚动条的可见性

Dim i As Long

VsScroll = False

i = GetScrollRange(MshGrid.hWnd, SB_HORZ, lpMinPos, lpMaxPos)

If lpMaxPos <> lpMinPos Then VsScroll = True

End Function

Public Function HeScroll(MshGrid As MSHFlexGrid) As Boolean ’判断垂直滚动条的可见性

Dim i As Long

HeScroll = False

i = GetScrollRange(MshGrid.hWnd, SB_VERT, lpMinPos, lpMaxPos)

If lpMaxPos <> lpMinPos Then HeScroll = True

End Function

8.程序运行时，想动态增加MSFlexgrid的列数

例：在第2列后插入一列

Private Sub Form_Load()

Me.MSHFlexGrid1.Cols = 5

MSHFlexGrid1.Rows = 2

For i = 0 To Me.MSHFlexGrid1.Cols - 1

Me.MSHFlexGrid1.TextMatrix(0, i) = i

Me.MSHFlexGrid1.TextMatrix(1, i) = i

End Sub

Private Sub Command1_Click()

Me.MSHFlexGrid1.Cols = Me.MSHFlexGrid1.Cols + 1

Me.MSHFlexGrid1.ColPosition(5) = 3

End Sub

9.请教MSFlexGrid中的对齐功能的使用

设置MSFlexGrid1.ColAlignment(index)=n

10.得到MSFlexGrid控件中当前选中的一行

msflexgrid1.row sel就是当前选中行

11.如何通过代码调节列宽度

msflexgrid1.colwidth(i)=4000

方法：

OLEDrag方法（ActiveX控件），Refresh方法（ActiveX控件），RemoveItem方法（MSHFlexGrid），AddItem方法（MSHFlexGrid），Clear方法（MSHFlexGrid），SelFocus方法，Drag方法，Move方法，ZOrder方法，ShowWhatsThis方法。

MSFlexGrid特有事件

※注1：MSFlexGrid控件的特有事件全部是不带参数的，要注意与DataGrid控件的同名事件区分

※注2：执行顺序：LeaveCell→ SelChange→ EnterCell→ RowColChange

◇ SelChange事件 (DISPID = 69)

Private Sub object_SelChange()

void OnSelChange(void);

◇ RowColChange事件 (DISPID = 70)

Private Sub object_RowColChange()

void OnRowColChange(void);

◇ EnterCell事件 (DISPID = 71)

Private Sub object_EnterCell()

void OnEnterCell(void);

◇ LeaveCell事件 (DISPID = 72)

Private Sub object_LeaveCell()

void OnLeaveCell(void);

◇ Scroll事件 (DISPID = 73)

Private Sub object_Scroll()

void OnScroll(void);

◇ Compare事件

Private Sub object_Compare(row1, row2, cmp)

void OnCompare(long nRow1, long nRow2, CMP_FUNCpFunc)

AddModeSettings 属性

常数

值

描述

flexNoAddNew

当前单元不在最后行中，并且没有 AddNew 操作处于待决。

flexAddNewCurrent

当前单元在最后一行，但没有 AddNew 操作处于待决。

flexAddNewPending

当前单元在倒数第二行。这是是通过 MSHFlexGrid 用户接口由用户初始化一个待决的 AddNew 操作的结果，或者是编程地设置一个列的 Value 或 Text 属性的结果。

AllowUserResizing属性

常数

值

描述

flexResizeNone

用户不能使用鼠标调整大小。这是缺省设置值。

flexResizeColumns

用户可以使用鼠标调整列的大小。

flexResizeRows

用户可以使用鼠标调整行的大小。

flexResizeBoth

用户可以使用鼠标调整列和行的大小。

Appearance 属性

常数

值

描述

flexFlat

MSHFlexGrid 的全部外观是平面的或正常的。

flex3D

MSHFlexGrid 的全部外观是三维的。

BorderStyle 属性

常数

值

描述

flexBorderNone

没有边框。

flexBorderSingle

有一个单边框。

CellAlignment 属性

常数

值

描述

flexAlignLeftTop

单元内容顶部左对齐。

flexAlignLeftCenter

单元内容中间左对齐。对字符串的缺省设置值。

flexAlignLeftBottom

单元内容底部左对齐。

flexAlignCenterTop

单元内容顶部居中。

flexAlignCenterCenter

单元内容中间居中。

flexAlignCenterBottom

单元内容底部居中。

flexAlignRightTop

单元内容顶部右对齐。

flexAlignRightCenter

单元内容中间右对齐。对数字的缺省设置值。

flexAlignRightBottom

单元内容底部右对齐。

flexAlignGeneral

单元内容一般对齐方式。对字符串中间左对齐而对数值中间右对齐。

CellPictureAlignment属性

常数

值

描述

flexAlignLeftTop

图片顶部左对齐。

flexAlignLeftCenter

图片中间左对齐。

flexAlignLeftBottom

图片底部左对齐。

flexAlignCenterTop

图片顶部居中。

flexAlignCenterCenter

图片中间居中。

flexAlignCenterBottom

图片底部居中。

flexAlignRightTop

图片顶部右对齐。

flexAlignRightCenter

图片中间右对齐。

flexAlignRightBottom

图片底部右对齐。

CellTextStyle、TextStyle、TextStyleFixed属性

常数

值

描述

flexTextFlat

文本为正常的、平面的文本。

flexTextRaised

文本看起来凸起。

flexTextInset

文本看起来凹入。

flexTextRaisedLight

文本看起来轻微凸起。

flexTextInsetLight

文本看起来轻微凹入。

CellType 属性

常数

值

描述

flexCellTypeStandard

单元为标准单元

flexCellTypeFixed

单元包含在一个固定行或列中。

flexCellTypeHeader

单元是一个数据带区的标头单元。

flexCellTypeIndent

单元用在缩进一个数据带区的一列中。

flexCellTypeUnpopulated

单元是一个未充填的单元。

ColAlignment 属性

常数

值

描述

flexAlignLeftTop

列内容顶部左对齐。

flexAlignLeftCenter

列内容中间左对齐。对字符串的缺省设置值。

flexAlignLeftBottom

列内容底部左对齐。

flexAlignCenterTop

列内容顶部居中。

flexAlignCenterCenter

列内容中间居中。

flexAlignCenterBottom

列内容底部居中

flexAlignRightTop

列内容顶部右对齐。

flexAlignRightCenter

列内容中间右对齐。对数值的缺省设置值。

flexAlignRightBottom

列内容底部右对齐。

flexAlignGeneral

列内容一般对齐方式。对字符串中间左对齐而对数值中间右对齐。

ColHeader 属性

常数

值

描述

flexColHeaderOn

为每一个带区显示标头。

flexColHeaderOff

没有为带区显示标头。

flexColHeaderOnce

为带区显示标头。如果带区被折叠，只显示一个标头。重复的标头不显示。

DisplayBandSettings属性

常数

值

描述

flexBandDisplayHorizontal

MSHFlexGrid 中的带区水平显示（横向）。缺省设置值。

flexBandDisplayVertical

MSHFlexGrid 中的带区竖直显示（上下方向）。

DisplayCellSettings属性

常数

值

描述

FlexCellDisplayHorizontal

MSHFlexGrid 中的带区水平显示（横向）。

flexCellDisplayVertical

MSHFlexGrid 中的带区竖直显示（上下方向）。

FillStyle 属性

常数

值

描述

flexFillSingle

单个。更改Text 或任何单元属性只影响活动单元。缺省设置值。

flexFillRepeat

重复。更改Text 或任何单元属性影响所有选定单元。

FocusRect 属性

常数

值

描述

flexFocusNone

围绕当前单元没有焦点矩形。

flexFocusLight

围绕当前单元有一个浅色的焦点矩形。缺省设置值。

flexFocusHeavy

围绕当前单元有一个深色的焦点矩形。

GridLines、GridLinesFixed属性

常数

值

描述

flexGridNone

没有线。单元格之间没有线。在 MSFlexGrid 中，对 GridLines 这是缺省的设置值。

flexGridFlat

有线。单元格之间线风格被设置为正常的、平面的线。在 MSHFlexGrid 中，对 GridLines 这是缺省的设置。

flexGridInset

凹入线。单元格之间线的风格被设置为凹入线。在 MSFlexGrid 中，对 GridLinesFixed 这是缺省的设置值。

flexGridRaised

凸起线。单元格之间的线风格被设置为凸起线。在 MSHFlexGrid 中，对 GridLinesFixed 这是缺省的设置值。

HighLight 属性

常数

值

描述

flexHighlightNever

选定单元无突出显示。

flexHighlightAlways

选定单元总是突出显示。这是缺省设置值。

flexHighlightWithFocus

突出显示只在控件有焦点时才显现。

MergeCells 属性

常数

值

描述

flexMergeNever

不显示。包含相同内容的单元不分组。这是缺省设置值。

flexMergeFree

自由。包含相同内容的单元总是合并。

flexMergeRestrictRows

限制行。只有行中包含相同内容的相邻单元（向左）合并。

flexMergeRestrict-Columns

限制列。只有列中包含相同内容的相邻单元（向上）合并。

flexMergeRestrictBoth

限制行和列。只有在行中（向左）或在列中（向上）包含相同内容的相邻的单元合并。

MousePointer 属性

常数

值

描述

flexDefault

MSHFlexGrid 的轮廓。

flexArrow

一个箭头指针。

flexCross

一组十字型指针。

flexIBeam

一个 "I"型标指针，来允许文本输入。

flexIcon

一个正方形中的方块。

flexSize

一个用箭头指向上方、下方、左方或右方调整大小指针。

flexSizeNESW

一个用箭头指向右上方和左下方调整大小指针。

flexSizeNS

一个用箭头指向上方和下方调整大小指针。

flexSizeNWSE

一个用箭头指向左上方和右下方调整大小指针。

flexSizeEW

一个用箭头指向左方和右方调整大小指针。

flexUpArrow

一个指向上方的箭头。

flexHourGlass

一个沙漏符号。

flexNoDrop

一个“不允许放下”指针。

flexCustom

一个自定义风格指针。

PictureType 属性

常数

值

描述

flexPictureColor

产生一个高品质的全色图象。

flexPictureMonochrome

产生一个较低品质、单色，占用较少内存的图象。

RowSizingSettings属性

常数

值

描述

flexRowSizeIndividual

调整一个行的大小只更改调整的行的高度。这是缺省设置值。

flexRowSizeAll

调整一个行的大小更改 MSHFlexGrid 中的所有行的高度。

SelectionMode 属性

常数

值

描述

flexSelectionFree

自由。允许选定 MSHFlexGrid 中的个别单元，电子数据表风格。（缺省设置值）

flexSelectionByRow

按行。强制跨越整个行选择，如在一个多列列表框或基于记录的显示。

flexSelectionByColumn

按列。强制跨越整个列选择，如同为一个图表选择范围或为排序选择字段。

ScrollBars 属性

常数

值

描述

flexScrollNone

MSHFlexGrid 没有滚动条。

flexScrollHorizontal

MSHFlexGrid 有一个水平的滚动条。

flexScrollVertical

MSHFlexGrid 有一个竖直的滚动条。

flexScrollBoth

MSHFlexGrid 有水平和竖直的滚动条。这是缺省设置值。

Sort 属性

常数

值

描述

flexSortNone

无。不执行排序。

flexSortGenericAscending

一般升序。执行估计文本不管是字符串或者是数值的升序排序。

flexSortGenericDescending

一般降序。执行估计文本不管是字符串或者是数值的降序排序。

flexSortNumericAscending

数值升序。执行把字符串变换为数值的升序排序。

flexSortNumericDescending

数值降序。执行把字符串变换为数值的降序排序。

flexSortStringNoCaseAsending

字符串升序。执行不区分大小写字符串比较的升序排序。

flexSortNoCaseDescending

字符串降序。执行不区分大小写字符串比较的降序排序。

flexSortStringAscending

字符串升序。执行区分大小写字符串比较的升序排序。

flexSortStringDescending

字符串降序。执行区分大小写字符串比较的降序排序。

flexSortCustom

自定义，使用 Compare 事件比较行。

属性：（下面的有关各属性的具体用法，我会继续更新）

OLEDropMode属性（ActiveX控件）；

Height,Width属性（ActiveX控件）；

Index属性（ActiveX控件）；

Left,Top属性（ActiveX控件）；

Tag属性（ActiveX控件）；

Visible属性（ActiveX控件）；

Object属性（ActiveX控件）；

ColPos属性；

ColPositon,RowPosition属性；

Cols, Rows属性（MSHFlexGrid）；

ColSel,RowSel属性；

ColWidth属性（MSHFlexGrid）；

FillStyle属性（MSHFlexGrid）；

FixedCols,FixedRows属性（MSHFlexGrid）；

FocusRect属性；

FontWidth,FontWidthBand,FontWidthFixed, FontWidthHeader属性（MSHFlexGrid）；

ForeColor,ForeColorBand, ForeColorFixed, ForeColorHeader, ForeColorSel属性；

FormatString属性；

GridColor,GirdColorBand, GridColorFixed, GridColorHeader,GridColorIndent,GridColorUnpopulated属性；

GridLines,GridLinesBand,GridLinesFixed, GridLinesHeader, GridLinesIndent,GridLineUnpopulated属性（MSHFlexGrid）；

GridLineWidth,GridLineWidthBand, GridLineWidthFixed,GridLineWidthHeader, GridLineWidthIndent,GridLineWidthUnpopulated属性（MSHFlexGrid）；

HighLight属性（MSHFlexGrid）；

LeftCol属性（MSHFlexGrid）；

MergeCells属性；

MergeCol, MergeRow属性；

MouseCol, MouseRow属性；

Name属性（MSHFlexGrid）；

Picture属性（MSHFlexGrid）；

PictureType属性；

Redraw属性；

RowHeight属性（MSHFlexGrid）；

RowHeightMin属性；

RowVisible属性；

RowPos属性；

ScrollBars属性（MSHFlexGrid）；

ScrollTrack属性；

SelectionMode属性；

Sort属性（MSHFlexGrid）；

Text属性（MSHFlexGrid）；

TextArray属性；

TextMatrix属性；

TextStyle,TextStyleBand, TextStyleFixed, TextStyleHeader属性（MSHFlexGrid）；

TopRow属性（MSHFlexGrid）；

Version属性（MSHFlexGrid）；

WordWrap属性（MSHFlexGrid）；

AllowBigSelection属性；

AllowUserResizing属性；

BackColor,BackColorBkg, BackColorFixed, BackColorSel属性；

CellAlignment属性；

CellBackColor,CellForeColor属性；

CellFontBold属性；

CellFontItalic属性；

CellFontName属性；

CellFontSize属性；

CellFontStrikeThrough属性；

CellFontUnderline属性；

CellFontWidth属性；

CellHeight,CellLeft, CellTop, CellWidth属性（MSHFlexGrid）；

CellPicture属性；

CellPictureAlignment属性；

CellTextStyle属性；

Clip属性（MSHFlexGrid）；

Col,Row属性（MSHFlexGrid）；

ColAlignment,ColAlignmentBand, ColAlignmentHeader属性（MSHFlexGrid）；

ColData,RowData, BandData属性（MSHFlexGrid）；

ColIsVisible属性；

DataBindings属性；

TabIndex属性；

DragIcon属性；

DragMode属性；

MouseIcon属性；

TabStop属性；

HelpContextID属性；

Parent属性；

Container属性；

ToolTipText属性；

WhatsThisHelp属性；

Appearance属性（ActiveX控件）；

BorderStyle属性（ActiveX控件）；

Enabled属性（ActiveX控件）；

DataSource属性（ActiveX控件）；

hWnd属性（ActiveX控件）；

MousePointer属性（ActiveX控件）。

0 0