barcod in BI Report sql server

Public Function GetBarcode(ByVal valueToEncode As String) As Byte() 

objBarcode.Code = valueToEncode 

objBarcode.Symbology = Neodynamic.ReportingServices.Symbology.Code128 

objBarcode.BarWidth = 0.01 

objBarcode.BarHeight = 0.4 

objBarcode.AutoSize = False 

objBarcode.Width = 2.875 

objBarcode.Height = 0.625 

Return objBarcode.GetBarcodeImage() 

End Function

•  Note that the instance will be called objBarcode and that the full reference to the class is Neodynamic.ReportingServices.Barcode

MIMEType is set to image/bmp

Source is set to Database

Value is set to =Code.GetBarcode("Model ID: " & ReportItems!txtProductModelID.Value)

Sizing is set to AutoSize

Size Width is set to 2.875in (the same value that appears in the GetBarcode function)

Size Height is set to 0.625in (the same value that appears in the GetBarcode function)
PressMe