主题：汇总模式下显示行信息会出错

以下是afterselchange里的代码，原意是切换行时能实时显示当前行的信息，但是在汇总模式切换下总是出错，求指教：

Dim t As Table = CurrentTable

Dim st As String

'Dim cn As Integer = e.Table.Current.Index 'cn = col number

If t.Rows(t.RowSel).IsGroup = False  Then

    'If  cn > -1 Then

    st = "序号 :" & e.Table.Rows(e.Table.Rowsel,True)("序") & ", 订单号:" & e.Table.Rows(e.Table.Rowsel,True)("报价") 

Else

    St = "数据汇总行"

End If

StatusBar.Message1 = st

错误提示截图：
此主题相关图片如下：qq截图20131018115908.png