Thank you NauticalGent for your help, but as a newbie I'm just not getting it.
Isn't there just simply a modification to:
Mid([Barcode],InStr([Barcode],"-")+1,(InStr(InStr([Barcode],"-")+1,[Barcode],"-") -InStr([Barcode],"-"))-1)
to get me what I need?