In you code the Split returns a collection of values. If you would like to get the N item from your collection use the code:
Save the values into a collection:
ClearCollect(varBarcode,Split(BarcodeRead1.Value,","))
Get the Nth item from the barcode, for your Default property.
Last(FirstN(Split(varBarcode.Value,","), N))