关于MSHFlexGrid控件的相关操作
刚做完机房收费系统,我们在此期间遇到了很多关于MSHflexgrid的操作。现在来总结一下关于它的一系列常见用途!
1.关于它的属性页设置:右击属性
2:属性和方法
由于该控件涉及到的属性和方法比较多,我就介绍几个我们在机房系统中最常使用的几个吧。
.rows :行属性第一行其返回值为0,依次类推
.rowsel:选中行数,可以为一个范围多行
.mouserow:鼠标所在行
.cols:列属性
.clowidth:列宽
.textmatrix(introw,intcol):返回具体某一单元各中的内容
.cellallignment:单元格中内容的对齐方式
.backcolorsel:选中单元格背景色
.remouveitem:移除某一行内容
3:事件
mousedown,mouseup :当鼠标按下或弹起时的相应的操作
clear:清除内容,一般用在防止所需内容重复加载时
4:以上是我们遇到的一些基础内容
同时,在机房收费系统中,我们遇到的将flexgrid表中的记录删除也算是接触到的一个比较新的知识,我把我的解决方法总结一下。
Private Sub cmddelete_Click() Dim mrc As ADODB.Recordset Dim txtSQL As String Dim msgText As String '将删除的用户从注册表中删除 txtSQL = "select * from user_info where user_ID='" & flexgriduserinfo.TextMatrix(flexgriduserinfo.Row, 0) & "'" Set mrc = ExecuteSQL(txtSQL, msgText) If Not mrc.EOF Then mrc.Delete mrc.Update End If With flexgriduserinfo If .RowSel = 1 Then '如果选中标题行,注意我这里将标题行放在了第二行所以.rowsel=1 MsgBox "请选中要删除的一行!" Exit Sub End If .RemoveItem .Row '移除要删除的一行 MsgBox "用户删除成功!" Exit Sub End With End Sub