在C1FlexGrid表格上打印行号

 

    '-------------------------------------------------------------
    '功能：在C1FlexGrid表格上打印行号

    '参数：C1FlexGrid

    '返回：无

    '方法：C1PrintRow(c1flexgrid1)
    '-------------------------------------------------------------
    Public Sub C1PrintRow(ByVal flexgrid As C1FlexGrid)
        Dim i As Integer
        For i = 1 To flexgrid.Rows.Count - 1
            flexgrid(i, 0) = i
        Next
    End Sub