主题：[求助]关于样式的代码

'列出本工序在工序合并表中的位置

If e.Table.Current Is Nothing Then '如果Current为Nothing

    Return

Else

    If Forms("生产记录录入辅助窗口").Opened Then

        Tables("生产记录录入辅助窗口_Table1").Fill("Select 工序,单据号,品名,卷号,母卷号,牌号,厚度,宽度,重量,起始时间,结束时间,往来合同,往来公司 F rom {工序合并表} Where [母卷号] = '" & e.Table.Current("母卷号") & "'" ,"ShcsErpSql",True)

        Tables("生产记录录入辅助窗口_Table1").Sort = "卷号,起始时间"

        Tables("生产记录录入辅助窗口_Table1").Cols("厚度").DataCol.SetFormat("0.000")

        Tables("生产记录录入辅助窗口_Table1").Cols("宽度").DataCol.SetFormat("0.0")

        Tables("生产记录录入辅助窗口_Table1").Cols("重量").DataCol.SetFormat("0.00")

        Tables("生产记录录入辅助窗口_Table1").Cols("起始时间").DataCol.SetDateTimeFormat(DateTimeFormatEnum.DateTime)

        Tables("生产记录录入辅助窗口_Table1").Cols("结束时间").DataCol.SetDateTimeFormat(DateTimeFormatEnum.DateTime)

        Tables("生产记录录入辅助窗口_Table1").AutoSizeCols()

    End If

End If

执行后有以下结果：

此主题相关图片如下：qq截图1.jpg

就以图中例子而言，我希望生产记录表选中的哪一行记录的卷号(即HS150001B)在工序合并表中以黄底显示，这样让用户能一目了然的知道选中的记录在工序合并表中所处的位置。

谢谢！！！