Thanks for all your help Edneeis.

I eventually got it working a treat.

Dim dr() As DataRow = ds.Tables(0).Select(String.Concat("itemDescription='", ComboBox1.SelectedText, "'"))

didnt work for some reason but when I changed the Selecttext to Selectitem it did. Strange!!!!

Thanks again.
Now to try and package my application with Crystal.
Happy, Happy, Joy, Joy.