Question

VB GRID表格的应用

VB 在GRID表格有100条记录，其中有30条记录符合条件能否用红色显示，反之那70条记录用灰色显示，请教高手怎样实现呢

Answer 1

如果是datagridview的话，可以在RowEnter事件里面实现，我给你之前用过的一段代码参考下

    ''' <summary>
    ''' 第五列：计算：IF1603买入价-IF1604卖出价-参数1（结果和参数2比较，大于参数2就显示红色）
    ''' 第九列：计算：IF1603卖出价-IF1604买入价-参数3（结果和参数4比较，小于参数4就显示绿色）
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    Private Sub dgvShowData_RowEnter(sender As Object, e As DataGridViewCellEventArgs) Handles dgvShowData.RowEnter
        With sender.Rows(e.RowIndex).Cells(4)
            .Style.BackColor = If(.Value > Convert.ToInt32(Param2), Color.Red, Color.Empty)
        End With
        With sender.Rows(e.RowIndex).Cells(8)
            .Style.BackColor = If(.Value < Convert.ToInt32(Param4), Color.Green, Color.Empty)
        End With
    End Sub

追问

我用的表格是 VB6的 MSHFlexGrid，第十一列：是否卖出，如果卖出用红色，否则用绿色。刚才试用了一下所给的代码不行，不知是哪里出了问题，不过还是要谢谢你

追答

额。。。。我给的是vb.net的代码，你瞧瞧vb6.0里面的MSHFlexGrid有米有相关的事件，改改应该能用的