老大请进,有如下问题请帮忙看下:
'**********************
'现有以下条码打印代码,只是全部代码其中一段,如果执行以下这一段,报错如图,如果取消这段代码,执行正常。
Dim Bar As New BarCodeBuilderBar.Symbology = Barpro.Symbology.Ean13Bar.BarRatio = 0.3bar.Code = dr("运单号")
Dim rt As New Prt.RenderTableDim rm As new prt.RenderImagerm.Image = bar.GetImagert.Cells(0,0).RenderObject = rm
看提示信息,似乎是getimage的问题