pb技术 datawindow选中记录行改变背景颜色

//在datawindow的rowfocuschanged（）函数中添加如下红字代码即可（无需修改下面代码）
 rowfocuschanged（long CurrentRow）{
     This.SelectRow(0, false)
      if currentRow > 0 Then
        This.SelectRow(CurrentRow, True)
      End If
}