以下是引用wds1在2018-4-21 20:28:26的发言：

第一个按钮是初始化【控件必须建成控件数组】
Private Sub Command1_Click()
BarCodeCtrl1(0).Style = 7          '标准code_128
BarCodeCtrl1(0).LineWeight = 1     '线宽
BarCodeCtrl1(0).Direction = 0      '方向
BarCodeCtrl1(0).Value = 1234567890 '条码数字
BarCodeCtrl1(0).Width = 2000       '条码宽度
BarCodeCtrl1(0).Height = 1000      '条码高度
BarCodeCtrl1(0).Top = 100
End Sub
，第二个按钮是复制第一个控件【只复制了10个】
Private Sub Command2_Click()
For i = 1 To 10
Load BarCodeCtrl1(i)            '生成控件
BarCodeCtrl1(i).Value = 98765000 + i   '条码数字
BarCodeCtrl1(i).Top = 1100 + 1000 * i '生成控件位置
BarCodeCtrl1(i).Visible = True       '显示新生成控件
Next i
End Sub

以下是引用wds1在2018-4-22 12:40:04的发言：

正常你放一个条码控件，名称为BarCodeCtrl1，这时他只是普通的一个控件，它的index是空的，你应用时就用他的名字以及属性。

如果你复制，再粘贴会提示你是否创建数组控件，如果是那么原来的控件名称不变，但是它的index就会变为0，新粘贴的名称与原控件相同，他的index为1，之后类似。
不过这时候，你在使用第一个控件时，名称就变为元原来BarCodeCtrl1(0),之后的依次类推。
当然，你放完了第一个控件后，直接把index写成0，那么他也就变为数组控件，引用名称就必须是BarCodeCtrl1(0)

BarCodeCtrl1(0)：是一个BarCodeCtrl1控件，它的index=0，不过他是排在第一个的
BarCodeCtrl1(i)：是一个BarCodeCtrl1控件，他们的index=1，2，3，...n。么一个不同的index相当于一个独立控件。
          通过index你能用循环变量控制每个空间的属性。
BarCodeCtrl1(i).Value = 98765000 + i：是条码控件的条码序号【98765000】是你要产生的条码序号，你可以改为任意数字，i控制你要连续产生的数量
         假如i=1 to 10，那么产生的条码为：98765001、98765002、98765004、...\098765009、98765010

以下是引用wds1在2018-4-21 20:28:26的发言：

第一个按钮是初始化【控件必须建成控件数组】
Private Sub Command1_Click()
BarCodeCtrl1(0).Style = 7          '标准code_128
BarCodeCtrl1(0).LineWeight = 1     '线宽
BarCodeCtrl1(0).Direction = 0      '方向
BarCodeCtrl1(0).Value = 1234567890 '条码数字
BarCodeCtrl1(0).Width = 2000       '条码宽度
BarCodeCtrl1(0).Height = 1000      '条码高度
BarCodeCtrl1(0).Top = 100
End Sub
，第二个按钮是复制第一个控件【只复制了10个】
Private Sub Command2_Click()
For i = 1 To 10
Load BarCodeCtrl1(i)            '生成控件
BarCodeCtrl1(i).Value = 98765000 + i   '条码数字
BarCodeCtrl1(i).Top = 1100 + 1000 * i '生成控件位置
BarCodeCtrl1(i).Visible = True       '显示新生成控件
Next i
End Sub