' set barcode type = PDF417
Me.bc.Object.BarCode = 55
' set size mode to CustomModuleWidth
Me.bc.Object.SizeMode = 1
' now adjust module width to 0.254 mms
Me.bc.Object.ModuleWidth = "254"
' set number of data columns
' optional parameter, but required to get constant width
Me.bc.Object.PDF417.Columns = 5
' adjust row height to 3 times of the module width
Me.bc.Object.PDF417.RowHeight = 254 * 3
Me.bc.Object.Text = "my data"