分享

MSHFLEXGRID的重要属性使用技巧

 悟静 2009-08-13
MSHFLEXGRID的重要属性. MSHFLEXGRID的属性非常多,其实绝大部分的属性和网格的显示的外观有关.在MSDN里,这些属性足以将人搞得眼花缭乱的了(我相信你没有耐性一个一个地翻查). 下面列出常用的属性,方法事件及其简要说明.以便查阅. 属性 类型 说明
AllowBigSelector Boolean 返回/设置一个值,定义当在行或列的头部单击时,是否该行或列将整个被选中
AllowUseResizing Enum 设置/返回一个值,定义用户是否可以调整网格行,列的尺寸
BackColor Ole_Color 设置/返回一网格中非固定单元的背景色
BackColorBand Array/Ole_Color 设置/返回网格中每个独立BAND的背景色
BachColorBkg Ole_Color 设置/返回网格的背景色(单元头部除外)
BackColorFixed Ole_Color 设置/返回网格中固定单元的背景色
 BackColorHeader Array/Ole_Color 设置/返回网格头部单元的背景色
 BackColorIndent Array/Ole_Color 设置/返回网格中凹痕部分的背景色
BackColorSel Ole_Color 设置/返回网格选中单元的背景色
BackColorUnpopulated Ole_Color 设置/返回网格非用户操作区的背景色
BandData Array/Long 为独BAND设置/返回任意的值,以合在代码中通过这些值确定BAND BandDisplay Enum 定义在网格中BAND是水平还是垂直显示 BandExpandable ARRAY/BOOLEN 设置/返回值指明独立的BAND能否被折叠或展开
BandIndent Array/Long 定义BAND划分的字段数量
BandLevel Long 返回当前的单元包含的BAND总数量
 Bands Long 返回网格中BAND总数量
CellAlignment Integer 设置/返回一个值以定义当前单元的水平和垂直对齐方式
CellBackColor Ole_Color 定义当前单元的字体是否为粗体
CellFontBold Boolean 定义当前单元的字体是否为粗体
CellFontItalic Boolean 定义当前单元的字体是否为斜体
 CellFontName String 定义当前单元的字体名
CellFontSize String 定义当前单元的字体大小
CellFontStrikeThough Boolean 定义当前单元的字体是否为突显示
CellFontUnderline Boolean 定义当前单元的字体是有下划线
CellFontWidth Single 定义当前单元的字体宽(用点表示)
CellFontColor Ole_Color 设置/返回当前单元格的前景色
CellHeight Long 设置/返回当前单元格的高度
CellLeft Long 返回当前单元格的左边距
CellPicture StdPicture 设置/返回当前单元格的图片
CellPictureAlignment Integer 设置/返回当前单元格或某范围的单元格的图像对齐方式
CelltextStyle Enum 设置/返回当前单元或选中范围单元文本的3D风格
 CellTop Long 返回当前单元格的垂直位置
CellType Enum 设置/返回当前单元格的类型(标准.固定)
CellWidth Long 返回/设置当前的单元的宽度
 Clip String 设置/返回网格选定范围单元的内容
Col Array/Integer 设置/返回当前单元的水平坐标
ColAlignment Array/Integer 设置/返回当前列的对齐方式
ColalignmentBand Array/Integer 设置/返回BAND数据列的对齐方式
ColAlignmentFixed Array/Integer 设置/返回固定单元数据的对齐方式
ColAlignmentHeader Array/Integer 设置/返回固定头部单元数据的对齐方式
 ColData Ayyay/Long 为独立列设置/返回任意的值,以合在代码中通过这些值确定列
ColHeader Array/Enum 定义每个BAND头部是否显示
ColHeaderCaption Array/Single 定义每个BAND的列头部显示的文本
ColIsVisible ARRAY/BOOLEN 返回/设置某个列是否可见
ColPos Array/Long 返回某个给定列的左上角和网格左上角的距离
Colposition Array/Long 设置网格列的位置
Cols Long 返回/设置网格的列数量
ColSel Array/Long 设置/返回某个范围单元的起始列
ColWidth Array/Long 设置/返回某个列的宽度
ColWordWrapOption Array/Integer 设置/返回网格的非固定单元是否允许
WRAP ColWordWrapOptionBand Array/Integer 定义网格的BAND是否允许
WRAP ColWordWrapOptionFixed Array/Integer 定义列的固定单元是否允许
WRAP ColWordWrapOptionHeader Array/Integer 定义各头部是否允许
WRAP DataField Array/Single 一个独立列绑定的数据库字段
FillStyle Enum 定义改变文本或单元的其他属性是影响所有的选中单元还是只影响活动单元
 FixedCols Long 设置/返回固定列的列数
 FixedRows Long 设置/返回固定行的行数
FocusRect Enum 定义控件对当前单元的焦点表示
Font StdFont 返回/设置默认字体或各单元使用的字体
FontBand Array/StdFont 设置/返回各BAND使用文本的字体
FontFixed Single 设置/返回固定单元使用的字体
 FontHeader Array/StdFont 设置/返回各头部使用的字体
 FontWidth Single 设置/返回默认字体宽度
FontWidthBand Array/Single 设置/返回BAND使用的字宽
FontWidthFixed Single 设置/返回固定单元使用的字宽
FontWidthHeader Array/Single 设置/返回每个头部使用的字宽
ForeColr Ole_Color 设置/返回网格非固定单元使用的前景色
 ForeColorBand Array/Ole_Color 设置/返回网格各BAND的前景色
 ForeColorFixed Ole_Color 设置/返回网格固定单元的前景色.
ForeColorHeader Array/Ole_Color 设置/返回网格头部单元的前景色
ForeColorSel Ole_Color 设置/返回设置单元的前景色
FormatString String 定义一个格式串用来设置网格列的宽度,对齐方式,固定行文本固定列文本
GridColor Ole_Color 设置/返回网格单元间的线的颜色
 GridColorBand Array/Ole_Color 设置/返回网格BAND的线的颜色
 GridColorFixed Ole_Color 设置返回网格固定单元间的线的颜色
 GridColorHeader Array/Ole_Color 设置/返回网格头部间的线的颜色
 GridColorIndent Ole_Color 设置/返回网格INDENT单元间的线的颜色
 GridColorUnpopulated Ole_Color 设置/返回网格UNPOPULATED区域间的颜色
 GrigLine Enum 定义网格单元间的线的类型
 GrigLinesBand Array/Enum 定义网格各BAND间的线的类型
GrigLinesFixed Enum 定义网格固定单元的线的类型
GrigLinesHeader Array/Enum 定义网格各头部间的线的类型
 GrigLinesIndent Array/Enum 定义网格INDENT单元间的线的类型
GrigLinesUnpopulated Enum 定义网格UNPOPULATED区域间的线的类型
GrigLinesWidth Integer 设置/返回网格单元间的线的宽度
GrigLinesWidthBand Array/Integer 设置/返回网格各BAND间的线的宽度
 GrigLinesWidthFixed Integer 设置/返回网格固定单元间的线的宽度
GrigLinesWidthHeader Array/Integer 设置/返回网格各头间的线的宽度
 GrigLinesWidthIndent Array/Integer 设置/返回网格INDENT单元间的线的宽度
 GrigLinesWidthUnpopulated Integer 设置/返回网格UNPOPULATED区域间的宽度
Hieght Enum 定义如何以及何时高亮度显示网格的选中单元
LeftCol Long 网格最械的可见列
 MergeCells Enum 设置/返回一个值表明如何及何时将有相同内容的记录进行合并
MergeCol ARRAY/BOOLEN 设置/返回一个值表明哪些列可以将内容合并
MergeRow ARRAY/BOOLEN 设置/返回一个值表明哪些行可以将内容合并
MouseCol Long 返回鼠标光标的列坐标位置
MouseRow Long 返回鼠标光标的行坐标位置
Picture StdPicture 返回MSHFLEXGRID的控件快照
PictureType Enum 设置/返回PICTURE类型
Redraw Boolean 设置/返回一个值,表明
MSHFLEXGRIDR控件是否在每个改变后重画
Row Long 设置/返回当前单元的垂直坐标
RowData Array/Long 为各行设置/返回任意的值,以合在代码中通过这些值确定行
 RowExpandable Boolean 定义当前行是否可以展开
RowExpanded Boolean 返回一个值表明当前行是否展开
 RowHeight Array/Long 设置/返回各行的高度
RowHeightMin Long 设置/返回网格中行的最小高度
 RowIsVisible ARRAY/BOOLEN 设置/返回一个值,表明某个特定列是否可见
RowPos Array/Long 返回给定行左上角和
MSHFLEXGRID控件左上角的距离
RowPosition Array/Long 设置某个网格行的位置
Rows Long 返回网格的行的总数或者或BAND的行的总数
RowSel Long 设置/返回一个范围的单元的起始行
RowSizingMode Enum 设置/返回一个值表明对一行的设置是影响网格的所有行还是只影响被调整的行
 ScrollBars Enum 设置/返回一个值表明MSHFLEXGRID控件的滚动条类型
ScrollTrack Boolean 设置/返回一个值表明网格内容是在用户移动滚动条时随着改变还是滚动结束后改变
SelectionMode Enum 设置/返回一个值表明MFHFLEXGRID控件允许的选择类型.
Sort Enum 根据某些村准备设置排序的值 Text String 设置/返回一个单元或一个范围内单元的文本内容
TextArray array/string 不改变
ROW,COL属性,设置/返回任意单元的文本内容
 TextMatrix array/string 设置/返回某个选定行,列的单元的文本内容
 TextStyle Enum 设置/返回网格通常单元的3D文本风格
TextStyleBand Array/Enum 设置/返回网格BAND的3D文本风格
TextStyleFixed Enum 设置/返回网格各固定行的3D文本风格
TextStyleHeader Array/Enum 设置/返回网格各头部的3D文本风格
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/fxj331072/archive/2006/03/05/616010.aspx
 MSFlexGrid使用技巧 收藏
本来通过ERP中基础分类档案的每级编码规则控制来展现MSFlexGrid控件的使用技巧,大家只要向控件添加一个MSFlexGrid及Combo控件就好了,源码如下:
 Option Explicit Private Sub Combo1_Click()
MSFlexGrid1.text = Combo1.text
 End Sub
 Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyEscape Then
Combo1.Visible = False
MSFlexGrid1.SetFocus
 Exit Sub
End If
If KeyAscii = vbKeyReturn Then
 MSFlexGrid1.text = Combo1.text
Combo1.Visible = False
 MSFlexGrid1.SetFocus
 End If
 End Sub
 Private Sub Combo1_LostFocus()
 Combo1.Visible = False
MSFlexGrid1.SetFocus Exit Sub
End Sub
 Private Sub Form_Load()
 Dim i As Integer
Dim width, text, Archives width = Array("400", "2100", "800", "800", "800", "800", "800", "800", "800", "800", "800") text = Array("序号", "档案名称", "第1级", "第2级", "第3级", "第4级", "第5级", "第6级", "第7级", "第8级", "第9级") Archives = Array("null", "科目", "项目分类", "固定资产分类", "部门分类", "员工分类", "供应商分类", "客户分类", "销售商分类", "地区分类", "出入库类别", "存货分类", "预留12", "预留13", "预留14", "预留15", "预留16", "预留17", "预留18", "预留19", "预留20")
With MSFlexGrid1 .Rows = 21
 .Cols = 11
 .FixedCols = 2
 .FixedRows = 1
 End With
For i = 1 To 9
 Combo1.AddItem i
Next i
 For i = 0 To 10
 MSFlexGrid1.ColWidth(i) = width(i)
MSFlexGrid1.TextMatrix(0, i) = text(i)
Next i
 For i = 1 To 20
With MSFlexGrid1
.TextMatrix(i, 0) = i
.TextMatrix(i, 1) = Archives(i)
.RowHeight(i) = 300
 End With
 Next i
 End Sub
Private Sub MSFlexGrid1_Click()
Dim c As Integer, r As Integer
With MSFlexGrid1
 c = .col
r = .row
 If c > 1 And r > 0 Then Combo1.Left = .Left + .ColPos(c) + 50
Combo1.Top = .Top + .RowPos(r) + 50
Combo1.width = .ColWidth(c)
Combo1.text = .text
Combo1.Visible = True
 Combo1.SetFocus
 End If End With
End Sub
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then Call MSFlexGrid1_Click
End If
 End Sub
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/fxj331072/archive/2006/02/21/604684.aspx

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章