该控件是用来显示数据库数据的。
点击某一行的任意一个单元,则高亮显示整个行来表示数据被选定。不知道我说清楚没有。
请高手回答。谢谢,时刻在线,答完就结。
点击某一行的任意一个单元,则高亮显示整个行来表示数据被选定。不知道我说清楚没有。
请高手回答。谢谢,时刻在线,答完就结。
解决方案 »
- 事件触发Dialog,调用EDIT控件无法获取焦点
- 求:实现word操作自动评分的相关资料
- 为什么word转成chm文档时,插图无法显示呢?
- 為什么將窗體名改成大寫就說有名稱衝突?
- 请问我新做了一个控件,但是我怎么知道classid是什么呢?谢谢。
- 解决VB同时打开多张图的问题(每张图都能放大缩小)
- $$$$$$帮帮忙,谁去过这个网站,它的地址是什么?找到了送分噢!$$$$$$
- 请问Combox控件怎样实现让输入的数据有长度限制的功能呢?类似text空件的Mask属性。可是Combox没有这个属性啊
- 请问如何得到本机的CPU、内存大小、磁盘空间等信息?
- 请问RecordSet的什么属性能够知道一条记录里有几个字段?
- 怎样用VB控制系统音量控制中,麦克风属性的静音选项
- vb使用directshow开发视频采集程序
鼠标右键单击MSHFlexGrid,选择属性——〉通用,设置焦点区域为0,选择模式为1。就能点击某一行的任意一个单元,高亮显示整个行了。
Dim i_Col As Integer
Dim c_col As Integer
c_col = Hflexgrid.col
If c_col > 0 Then
For i_Col = 0 To Hflexgrid.Cols - 1
Hflexgrid.col = i_Col
Hflexgrid.CellBackColor = &HFFFFC0
Next i_Col
Hflexgrid.col = c_col
End If
End Sub
Private Sub hflexgrid_LeaveCell()
'当某一行失去焦点时,改变该行颜色
Dim i_Col As Integer
Dim c_col As Integer
c_col = Hflexgrid.col
For i_Col = 0 To Hflexgrid.Cols - 1
Hflexgrid.col = i_Col
Hflexgrid.CellBackColor = vbWhite
Next i_Col
Hflexgrid.col = c_col
End Sub