关于VBA BarCode条形码控件的属性+使用方法及VBA代码
一、属性及说明。
| 属性 | 说明 |
| Style | [Style] |
| 指定条形码符号的样式。 | |
| SubStyle | [SubStyle] |
| 指定更详细的样式。 | |
| Validation | [Validation] |
| 指定是否要验证数据的有效性。 | |
| LineWeight | [LineWeight] |
| 指定条形码符号的线条粗细。 | |
| Direction | [Direction] |
| 指定条形码控件的显示方向。 | |
| ShowData | [ShowData] |
| 指定是否要显示数据数值。 | |
| ForeColor | 指定条形码符号的前景颜色。 |
| BackColor | 指定条形码符号的背景色。 |
| Value | 指定所产生的条形码符号的值。 |
二、属性使用方法
| Direction (方向) | 说明 |
| 0 - 无 | 以标准方向(0 度)显示条形码符号。 |
| 1 - 90度 | 从标准方向旋转 90 度的位置显示条形码符号。 |
| 2 - 180度 | 从标准方向旋转 180 度的位置显示条形码符号。 |
| 3 - 270度 | 从标准方向旋转 270 度的位置显示条形码符号。 |
| LineWeight (线条粗细) | 说明 |
| 0 - 特细线 | 以最细的线条产生条形码符号。 |
| 1 - 细线 | |
| 2 - 中细线 | |
| 3 - 标准 | 以标准粗细的线条产生条形码符号。 |
| 4 - 中粗线 | |
| 5 - 粗线 | |
| 6 - 特粗线 | |
| 7 - 超特粗线 | 以最粗的线条产生条形码符号。 |
| ShowData (显示数据复选框) | 说明 |
| 0 | False 不显示 |
| 1 | True 显示 |
| Style (样式) | 说明 |
| 0 - UPC-A | 广泛应用于标识货物的 POS 符号(美国与加拿大)。 |
| 1 - UPC-E | UPC 的简短版。使用于无法印刷标准版的小型货物。 |
| 2-Jan-13 | 日本规格的 POS 符号与国际规格 EAN-13 POS 符号相同。可应用于包括书籍及杂志在内的所有货物。 |
| 3-Jan-18 | JAN 或 EAN 的简短版。使用于无法印刷标准版的小型货物。 |
| 4 - Casecode | 制造商或批发商在将货物出货至零售店时,标识于包装箱外部的符号。 |
| 5 - NW-7 | 表示出英文数字和字母的条形码符号。标识于电脑机器等特殊货物的包装上。 |
| 6 - Code-39 | 表示出英文数字和字母的条形码符号。自 FA(Factory Automation ,工厂自动化)起,被广泛地应用在工业上。 |
| 7 - Code-128 | 将全部 ASCII 的 128 个字节编码的条形码控件。 |
| 也有简短版。 | |
| 8 - US Postnet | 为了自动化处理而标识于邮件上的条形码符号(美国)。 |
| 9 - US Postal FIM | 为了自动化处理而标识于邮件上的特殊条形码符号(美国)。 |
| 10 - JP Post | 为了自动化处理而标识于邮件上的条形码符号(日本)。 |
ps: 只列举了常用的属性,其他的属性详细使用方法参考VBA 条形码控件参考
三、VBA代码更改条形码控件
Sub 条形码控件使用()
Dim BarCodeCtrl As BarCodeCtrl '声明变量为BarCodeCtrl
Set BarCodeCtrl = BarCodeCtrl0.Object '设置变量为窗体指定的BarCode控件对象
BarCodeCtrl.Style = 7 '样式
BarCodeCtrl.ShowData = 1 '显示数据 1:true 0:false
BarCodeCtrl.Value = "123456" '控件值
'.......其他控件属性及方法参考 :条形码控件参考
BarCodeCtrl.Refresh '更改完控件属性后刷新条码
End Sub
四、如何在窗体内 插入条形码控件
1. Access:

2.Excel

五、备注
Access条形码控件在窗体内的大小可能在每次刷新后控件大小都不是自己想要的状态,可以在代码中加入 控件.Height 控件.Width 来控制条形码的大小 示例:
Sub 条形码控件大小()
Me.BarCodeCtrl4.Width = 1500
Me.BarCodeCtrl4.Height = 500
End Sub
调整控件大小的时候,不需要去使用对象属性,直接调整窗体的控件属性即可
以上就是关于条形码控件使用方法!

508

被折叠的 条评论
为什么被折叠?



