由于没接触过专业报表
这是条码设置
此主题相关图片如下:qq截图20150414135514.png
我想直接用代码在FT里实现打印(或预览)
Dim doc As New PrintDoc
Dim img As prt.RenderImage
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code93
Bar.BarHeight = 7.08
Bar.QuietZoneWidth = 2
Bar.AddCheckSum = False
Bar.BearerBarWidth = 0.27
Bar.DisplayChecksum = False
Bar.TextAlignment = Barpro.Alignment.AboveLeft
Dim t As Table = Tables(e.Form.Name & "_Table1")
Dim rs As List(of Row) = t.GetCheckedRows
For Each r As Row In rs
Bar.Code = r("编号")
Bar.Text = "日期:" & r("日期")
img = new prt.RenderImage
img.Image = bar.GetImage
Doc.Body.Children.Add(img)
Next
'Doc.Preview()
不知道怎么写,求助