[求助] excel 报表中怎么设置数量 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

static idx As Integer
static drs As List(Of DataRow)
If e.Book.TempLate = "工序排配计划表" Then
    If e.region = "工序计划表" Then
        If e.DataRow IsNot Nothing Then
            For i As Integer = idx To idx + 9
                If i < drs.Count
                    Dim Bar As New BarCodeBuilder
                    Bar.Symbology = Barpro.Symbology.Code39
                    Bar.Code = drs(i)("工序ID")
                    Bar.BarRatio = 0.3
                    Bar.BarHeight = 8
                    Bar.Rotate = Barpro.Rotate.Degree270
                    Bar.AddCheckSum = False
                    bar.SaveImage(ProjectPath & "Images\BarCode" & i-idx & ".gif",300)
                Else
                    Dim bit As new bitmap(1,1)
                    bit.Save(ProjectPath & "Images\BarCode" & i-idx & ".gif")
                End If
            Next
            idx += 10
        End If
    End If
End If

主题：[求助] excel 报表中怎么设置数量