VSFlexGrid控件

VSFlexGrid控件1,如果想把某一列设置成下拉匡中选择，只能写成grid.colcombolist(1)=a|b|c吗？能不能把下拉框中的数据和recordset或数组绑定。答案:grid.colcombolist(1)＝grid.buildcombolist(rs!abc)2,怎样限定第三列可编辑,其他列不可编辑?答案:PrivateSubfg_BeforeEdit(ByValRowAsLong,ByValColAsLong,CancelAsBoolean)'*******先将设editable=2'限定不可编辑列,如有5列IfCol=0ThenCancel=TrueIfCol=1ThenCancel=TrueIfCol=2ThenCancel=TrueIfCol=4ThenCancel=TrueIfCol=5ThenCancel=TrueEndSub3、怎么获得当前单元个的位置，比如某单元个获得焦点，弹出msgbox(你选的是第4行第5列)Answer:PrivateSubVSFlexGrid1_Click()Dima,bAsLonga=VSFlexGrid1.Rowb=VSFlexGrid1.ColMsgBox你选的是&a&行&b&列EndSub4,对vsflexgrid进行编辑的时候，让vsflexgrid的某列只能输入数字?Answer:PrivateSubCheckData(KeyAsciiAsInteger)IfKeyAscii=48AndKeyAscii=57ThenExitSub'如果是数字退出IfKeyAscii8ThenKeyAscii=0EndSubPrivateSubvsflexgrid_KeyPressEdit(ByValRowAsLong,ByValColAsLong,KeyAsciiAsInteger)Ifcol=1Then'第一列只能输入数字CheckDataKeyAsciiEndIfEndSub5,限制某列只能输入数字Answer:PrivateSubfg_KeyPressEdit(ByValRowAsLong,ByValColAsLong,KeyAsciiAsInteger)DimNumbersAsString'允许输入的字符Iffg.Col=6Then'第6列Numbers=1234567890+Chr(46)+Chr(8)IfInStr(Numbers,Chr(KeyAscii))=0ThenKeyAscii=0EndIfEndIfEndSub6,如何指定一列的输入格式VSFlexGrid控件属性方法一览表VSFlexGrid控件属性方法一览表(带()为方法)属性/方法名称功能示例语法AddItem()增加一行O.AString[,RowIndex]Aggregate返回集合合计(总数,平均,等等)O.A=(A,Row1,Col1,Row2,Col2)Align对象在窗体上的显示位置O.A=0|1|2|3|4AllowBigSelection设定列头是否整行或整列选择O.A=True|FalseAllowSelection是否可多单元选择O.A=True|FalseAllowUserFreezing运行时用鼠标冻结行或列O.A=0|1|2|3AllowUserResizing调整(行/列)大小方式O.A=0|1|2|3|4Appearance边框平面/凹陷/凸起O.A=0|1|2Archive()存储或清除一个二进制文件内容O.AArcFileName,FileName,0|1|2|3ArchiveInfo返回一个二进制文件信息O.AArcFileName,0|1|2|3|4,LineIndexAutoReSize是否自动调整大小O.A=True|FalseAutoSearch设置自动搜索O.A=0|1|2AutoSearchDelay设置AutoSearch多少秒刷新O.A=2AutoSize()自动调整列到指定宽度O.ACol1,Col2,True|False,1000AutoSizeMode自动调整适合行列内容O.A=0|1AutoSizeMouse是否双击列首自动调整适合行列O.A=True|FalseBackColor所有非固定行列的背景色O.A=ColorBackColorAlternate所有非固定行列的交替行颜色O.A=ColorBackColorBkg表格背景坐底色O.A=ColorBackColorFixed固定的行/列背景色O.A=ColorBackColorFrozen冻结部分的行列背景色O.A=ColorBackColorSel单元被选中的背景色O.A=ColorBindToArray()绑定数组O.AArrayStr,RowDim,ColDim,PageDim,CurrentPageBookmark返回ADORecordset行书签(只读)O.A(Row)BorderStyle边框粗细样式O.A=0|1BottomRow返回可见范围的最大行号(只读)O.ABuildComboList()将数据库中的内容写入下拉框O.A(rs,FieldList,KeyField,BackColor)CausesValidation???目标事件确认O.A=False|TrueCell选择部分的相应准则值O.A(准则,Row1,Col1,Row2,Col2)=准则值CellAlignment设定单元里数据的排列方式O.A=0至9CellBackColor指定单元范围的背景颜色O.A=ColorCellBorder()选择单元范围的边界颜色O.AColor,左,上,右,下,垂直,水平CellButtonPicture选择单元范围的按钮图片O.A=LoadPicture(D:\Icon.ico)CellChecked选择单元范围的复选框O.A=0|1|2CellFloodColor选择单元范围的流程颜色O.A=ColorCellFloodPercent选择单元范围的流程百分比O.A=1至100CellFontBold指定单元范围设为黑体字O.A=False|TrueCellFontItalic指定单元范围设为斜体字O.A=False|TrueCellFontName对象所使用的字体名称O.A=FontNameCellFontSize对象文字像数大小(默认9pt)O.A=9CellFontStrikethru选择范围是否有删除线O.A=False|TrueCellFontUnderline选择范围是否有下画线O.A=False|TrueCellFontWidth设定单元或指定范围字体的宽度O.A=2CellForeColor设定单元或指定范围字体的颜色O.A=ColorCellHeight返回/显示到当前单元高度(只读)O.ACellLeft返回当前单元的左端位置(只读)O.ACellPicture显示在单元或指定范围中的图片O.A=LoadPicture(D:\Icon.ico)CellPictureAlingment单元或指定范围图片的显示位置O.A=0至10CellTextStyle设定单元文本的显示形式O.A=0|1|2|3|4CellTop返回当前单元的顶端位置(只读)O.ACellWidth返回当前单元的宽度(只读)O.AClear()清除表格内容O.A([0|1|2],[0|1|2|3])ClientHeight返回客户可见范围高度O.AClientWidth返回客户可见范围宽度O.AClip设置选择范围的内容O.A=TextClipSeparators???Col设置激活单元的列号O.A=2ColAlignment列对齐排列方式O.A(Col)=0至9ColComboList向下拉框写入管道字符O.A(Col)=|ListStr1|ListStr2|...ColData设置用户定义的长整形数据O.A(Col)=UserLongColDataType列数据类型O.A(Col)=0至14到20(&H14),30(&H1E),31(&H1F)ColEditMask列编辑套用格式字符串O.A(Col)=指定的格式如：######ColFormat格式化显示列O.A(Col)=Currency|#.###%...ColHidden是否隐藏指定列O.A(Col)=True|FalseColImageList设置图像列表句柄到列ColIndent缩进指定列O.ACol=100ColIndex返回列索引(只读)O.AColColIsVisible返回列是否可见(只读)O.AColColKey设置列钥匙O.A(Col)=KeyStrColPos返回列距左边宽度(只读)O.AColColPosition移动列的位置O.A(Col)=ReColCols返回/设置总列数O.A=2ColSel返回/设置最后选择的列O.A=3ColSort设置列种类O.A(Col)=0至10ColWidth返回/设置指定列宽O.A(Col)=100ColWidthMax最大列宽O.A(Col)=5000ColWidthMin最小列宽O.A(Col)=100ComboCount取得Combo下拉按钮总数(只读)O.AComboDataCombo下拉按钮数据(只读)O.AComboIndexCombo下拉按钮索引O.A=1ComboItemCombo下拉按钮项目(只读)O.AComboList向下拉框写入管道字符内容O.A=a|b|cComboSearchCombo下拉按钮搜寻方式O.A=0|1|2|3Container返回/设置对象的容器O.A.Caption=FormsDataBindings返回数据装入数(只读)O.ADataMember返回/设置数据描述成员O.A=DataStrDataMode设置数据链接状态O.A=0|1|2|3|4DataRefresh()刷新数据源O.ADataSource设置数据源SetO.A=DataDimDrag()拖放O.A[0|1|2]DragIcon拖放图标O.A=LoadPicture(D:\Icon.ico)DragMode拖放方式O.A=0|1DragRow()拖放行(本示例在MouseDown过程)O.AO.RowSelEditable设置表格是否可编辑修改O.A=0|1|2EditCell()当移动到当前单元时自动选择O.AEditMask当编辑时只能使用指定值O.A=StrValueEditMaxLength所有单元限制字节大小O.A=2EditSelLength编辑时选择长度O.A=5EditSelStart移动到单元时的光标位置O.A=0(或者Len(vsg.text))EditSelText编辑选择处放文本O.A=StrEditText编辑文本O.A=StrEditWindow返回编辑窗口(只读)O.AEllipsis超宽字符加省略号O.A=0|1|2Enabled对象是否激活可用O.A=False|TrueExplorerBar单击列头的选择、拖动或排序样式O.A=0至15ExtendLastCol是否扩充最后的列到适合宽度O.A=False|TrueFillStyle是否改变当前范围的内容或格式O.A=0|1FindRow查找符和条件返回的行(只读)O.AFindStr,[Row],[Col],[敏感],[精度])FinishEditing()完成编辑的O.A=False|TrueFixedAlignment固定列的对齐方式O.A(Col)=0至9FixedCols固定几列O.A=1FixedRows固定几行O.A=1FlexDataSource流动数据源O.A=rsDateFloodColor设置流程颜色O.A=ColorFocusRect单元的选择虚框样式类型O.A=0|1|2|3|4|5Font设定字体O.A=FontNameFontBold设定字体粗体O.A=False|TrueFontItalic设定字体斜