使用状态栏

假定有个窗口，窗口中有一个SQLTable，底部有个状态栏，希望：

1、打开窗口后，在状态栏左侧显示当前用户名。
2、在SQLTable中选择某数值列的多个单元格后，能在状态栏右侧显示合计值。

设计步骤：

1、在菜单设计器中，新增一个状态栏

2、在状态栏增加一个项目，类型为Label，名称为“User”，用于显示当前用户名

3、在状态栏增加一个项目，类型为Label，名称为“Stat”，位置属性设置为"Right"，用于显示合计值。

4、在窗口的AfterLoad事件加上代码：

e.Form.Strips("状态栏").Items("User").Text =  User.Name

5、在SQLTable的AfterSelRangeChange事件加上代码：

If e.Form IsNot Nothing Then
    Dim it As Winform.StripItem = e.Form.Strips("状态栏").Items("Stat")
    Dim t As Table = e.Table
    it.Text = ""
    If  t.Cols(t.ColSel).IsNumeric Then '如果当前列是数值列
        it.Text = "合计:" & t.Aggregate(AggregateEnum.Sum,t.TopRow,t.ColSel,t.BottomRow,t.ColSel)
    End If
End If