Guidance
指路人
g.yi.org
software / rapidq / Examples / Graphics & Animation / barcode / barcode / Code128 / code128.bas

Register 
注册
Search 搜索
首页 
Home Home
Software
Upload

  
'----------------------------------------------------------
'
' BARCODE CODE 128
'
'----------------------------------------------------------
     $APPTYPE  CONSOLE
     $OPTIMIZE ON
'
     $INCLUDE "c:\inc\c128.inc"
     $INCLUDE "c:\inc\makebmp.inc"
'
     DIM barcod AS STRING
     DIM stc AS INTEGER

     stc=104
     BLineWidth=3           ' breedte per lijn
     filename  ="c:\inc\C128.bmp"

     barcod=code128(stc,"123")

     makebmp (barcod,"123",BLineWidth,filename)


掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Fri 2024-3-29  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0 Last modified:2001-06-15 01:42:44