我这执行没问题啊..
Dim Bar As New BarCodeBuilderBar.Symbology = Barpro.Symbology.Code39Bar.Code = "123456"Bar.BarRatio = 0.3Bar.BarHeight = 8Bar.SaveImage("E:\123.jpg")
加好友 
发短信
Post By：2011/8/29 10:01:00 [显示全部帖子]
