MSFlexGrid控件属性与使用方法.docx
《MSFlexGrid控件属性与使用方法.docx》由会员分享,可在线阅读,更多相关《MSFlexGrid控件属性与使用方法.docx(11页珍藏版)》请在优知文库上搜索。
1、MSFIeXGrid控件属性及使用方法整理byu3u3以下内容由u3u3编写测试成功!转载请注明来自:=二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二二=MSF1exGrid总行数和总列数的定义:MSFlexGricll.Rows=5规定表格的总行数为5行MSFlexGricll.Cols=2规定表格的总列数为2行MSFlexGrid某一单元格的文本内容MSFlexGridLTextMatrix(3,0)二网站地址定义第3行的左边表头文本内容为:“网站地址MSFlexGridLTextMatrix(3,2)=定义第3行第2列的文本内容为:”右键选中MSFlexGrid
2、的PrivateSubMSFleXGridLMoUSeDown(BUttonAsInteger,ShiftAsInteger,xAsSingle,yAsSingle)IfButton=VbRightButtonThenMSFlexGridl.Row=y/MSFlexGridLRowHeight(O)-0.5MSFlexGridl.RowSel=MSFlexGricll.Row右键选种当前行-备用u3u3:,MSFlexGridl.Col=0,MSFlexGridl.ColSel=MSFlexGridl.Cols-1,右键选种当前单元格-备用u3u3:,MSFlexGridl.Col=x/MsF
3、lexGridLColWidth(O)-0.5,MSFlexGridl.Col=MSFlexGridl.Col,Textl.Text=MSFlexGridl.TextEndIfEndSubMSFlexGrid的单元格被点击时的事件PrivateSubMSFlexGricllEnterCell()MSFlexGridl.CellBackColor=vbBlue被点中MSFlexGrid的单元格背景变兰色MSFlexGridl.CellForeColor=VbWhite字体变白色EndSubMSFlexGrid的单元格失去光标后的事件PrivateSubMSFlexGridl_LeaveCellO
4、MSF1exGrid1.Ce11BackCo1or-vbWhiteMSF1exGrid1.Ce11ForeCo1or-vbBlueEndSub使MSFlexGrid的单元格内容可编辑,前提:新建两个text文本框,分别为textl和textl=从这里开场,使单元格可以编辑PrivateSubMSFlexGridl_EnterCell()MSFlexGridl.CellBackColor=vbBlueMSFlexGridl.CellForeColor=vbWhiteTextl.Text=MSFlexGridl.TextTextl.SelStart=OTextl.SelLength=Len(Tex
5、tl.Text)EndSubPrivateSubMsFlexGricllLeaveCellOMSFlexGridl.CellBackColor=vbWhiteMSFlexGridl.CellForeColor=vbBlueEndSubPrivateSubTextlChangeOMSFlexGridl.TextMatrix(MSFlexGridl.Row,MSFlexGridl.Col)二Textl.TextEndSubPrivateSubText2ChangeO修改表头Dimr,cAsIntegerr=MSFlexGridl.Rowc=0MSFlexGridl.TextMatrix(r,O)=
6、Text2.TextEndSubPrivateSubTextl_KeyDown(KeyCodeAsInteger,ShiftAsInteger)SelectCaseKeyCodeCasevbKeyLeft,VbKeyRight,vbKeyUp,VbKeyDownKeyCode-OEndSelectEndSub,=使单元格可以编辑,到此完毕MSFlexGrid选中整行和整列右键点MSFIeXGrid控件,选“属性/样式,把合并单元格选择为:“0-Never”然后运行程序,就会发现MSFIeXGrid可以自由选择整行或整列了!MSFlexGrid插入行PrivateSubCommand1Click
7、()IfMSFlexGridLRows2ThenMSFlexGridLAddItemAAN&vbTab&bbbElseMSFlexGridLAddItemasdas&vbTab&bbb,2这里的数字2表示在第2行处插入行EndIfEndSubMSFlexGrid删除行MSFIeXGriclLRemoVeltem3删除第三行。该方法无法删除第一行。如果发现删不了。那一定是你的其他代码写错或冲突了u3u3复制MSFlexGrid单元格的文本内容Clipboard.SetTextMSFlexGridl.TextMatrix(MSFlexGridl.Row,MSFlexGridl.Col)以上内容由u
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- MSFlexGrid 控件 属性 使用方法