加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

VB中使MSFlexGrid控件内容改变字体颜色/字体颜色高亮

(2013-06-30 22:58:34)
标签:

vb笔记

vb知识

hflexgrid

it

分类: 封笔之VB笔记

下面举一个实现此功能的例子:

Private Sub HFlexgrid_EnterCell()
        '*将当前行改变颜色
Dim       As Integer
Dim iCol    As Integer
    iCol HFlexgrid.Col
    For HFlexgrid.FixedCols   To HFlexgrid.Cols
        HFlexgrid.Col 1
        HFlexgrid.CellBackColor &HFFFFC0
    Next i
    HFlexgrid.Col iCol
End Sub
Private Sub HFlexgrid_LeaveCell()
        '*将当前行改变颜色
Dim       As Integer
Dim iCol    As Integer
    If HFlexgrid.Row Then
        Exit Sub
    End If
    iCol HFlexgrid.Col
    For HFlexgrid.FixedCols   To HFlexgrid.Cols
        HFlexgrid.Col 1
        HFlexgrid.CellBackColor vbWhite
    Next i
    HFlexgrid.Col iCol
End Sub

 

如果你需要单选一行 :
Grid.Row 行号
Grid.RowSel 行号
Grid.Col 0
Grid.ColSel Grid.Cols 1

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有