窗体上有一个文本框,是父项内容
还有一个DataGrid,根据文本框的父项内容显示子项的n条记录。
现在的问题是,我对子项的某些内容作了标记,比方说子项表child中某个字段为,我要突出显示的记录,的值就为1,要显示的就是这些记录,”select * from child where =1“
我要如何使这些记录能够突出显示?
最好能用到上面的SQL语句。
各位大虾们帮帮忙吧!
我的运行环境是VB6+SQL2000

解决方案 »

  1.   

    是什么意思,是在DataGrid中只显示值为1的吗?还是记录都显示,但值为1的突出显示,如字体加粗加黑等,到底什么意思?
      

  2.   

    那要控制 row 的背景了,建议使用 fpspread 很简单的,你下个vb6 可以用的,就在csdn 的下载频道就有搜搜。
      

  3.   

    Private Sub Form_Activate()
        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
      

  4.   


    vb6 datagrid仅可见行可以高亮(也就是你说的突显)
    用以下语,我就不帮你具体编程了,大概意思为:
    for x = 0 to DataGrid1.VisibleRows '可见行!!
        '假如某行的=1,然后让这一行高亮
        if =1 then
           DataGrid1.SelBooks.Add DataGrid1.RowBook(x)'让这一行高亮
         endif
    next x
      

  5.   


    楼上正解。DataGrid 控件已经用 SelBooks 集合预留了多选的方式。