窗体上有一个文本框,是父项内容
还有一个DataGrid,根据文本框的父项内容显示子项的n条记录。
现在的问题是,我对子项的某些内容作了标记,比方说子项表child中某个字段为,我要突出显示的记录,的值就为1,要显示的就是这些记录,”select * from child where =1“
我要如何使这些记录能够突出显示?
最好能用到上面的SQL语句。
各位大虾们帮帮忙吧!
我的运行环境是VB6+SQL2000
还有一个DataGrid,根据文本框的父项内容显示子项的n条记录。
现在的问题是,我对子项的某些内容作了标记,比方说子项表child中某个字段为,我要突出显示的记录,的值就为1,要显示的就是这些记录,”select * from child where =1“
我要如何使这些记录能够突出显示?
最好能用到上面的SQL语句。
各位大虾们帮帮忙吧!
我的运行环境是VB6+SQL2000
解决方案 »
- 如何使曲线的上不规律的点变成连接后成弧形
- sql 语句 联合查询的问题 急!!
- 我装的VB里面怎么没有ADO连接呀,请各位高手帮帮我,我都重装了好几次了,也换了几个不同的版本,总是看不到ADO连接
- datagrid与ado绑定数据库
- 关于Picture和Image的问题.
- 用TreeView1.SetFocus出现“无效的过程或参数调用”!?
- 请问如何用 sendmessage 发送键盘按键消息?
- 请问怎么设置用户权限
- 有关键盘问题
- ADO引用,答对即给分。在线等待
- vb做的控件放在网页里,控件有2个界面(有前后关系),怎么样切换这2个界面啊?
- 关于拷贝独占文件的问题(NTFS格式已经可以,Fat32不行)
Dim i As Long, n As Long, j As Long
n = MSHFlexGrid1.Rows - 1
For i = 1 To n
MSHFlexGrid1.Row = i
MSHFlexGrid1.Col = 5 '假设第5个字段是 字段
If MSHFlexGrid1.Text = "1" Then
For j = 1 To 5
MSHFlexGrid1.Col = j
MSHFlexGrid1.CellBackColor = &H80000012
MSHFlexGrid1.CellForeColor = &H8000000E
Next j
End If
Next
End Sub
vb6 datagrid仅可见行可以高亮(也就是你说的突显)
用以下语,我就不帮你具体编程了,大概意思为:
for x = 0 to DataGrid1.VisibleRows '可见行!!
'假如某行的=1,然后让这一行高亮
if =1 then
DataGrid1.SelBooks.Add DataGrid1.RowBook(x)'让这一行高亮
endif
next x
楼上正解。DataGrid 控件已经用 SelBooks 集合预留了多选的方式。