如何用vfp制作条形码

有2个方式:

1,使用条形码字体, 安装拆神到系统后, 设置一个label,或者textbox的字体为这个条形码字体, 直接设置caption或者value为条旅猜亏形码数字就行

2,使用ocx控件, 这兆答个网上搜.

以EAN13为例：弯扮

S1=0

S2=0

C_BARCODE=LTRIM(STR(N_BARCODE))

FOR I=2 TO 12 STEP 2

S1=S1+VAL(LEFT(C_BARCODE,I,1))

ENDFOR

FOR I=1 TO 11 STEP2

S2=S2+VAL(LEFT(C_BARCODE,I,1))

ENDFOR

N_VERIFIABLE=10-MOD(3*S1+S2,10)

N_VERIFIABLE即世吵为效验搜闹侍码。

可以实现，关键是看你用什麼打印机打印，是条码打印机，还是A4打印机。

用轿空条码打印机要简单些，闭罩瞎用A4打印机稍微复杂点。你用条码字体打印，应该不是条码打印机，这时候你需要先将条码生成闷尘图片在打印，才能扫描的上呢。如果还有问题，你把邮箱留下，我这有我写的一个程式，可以发给你参考。

---