Γεια σας,
Φαίνεται ότι αυτά που ρωτάω δεν είναι κατανοητά και δεν έχω ούτε μία απάντηση, γιατί για δύσκολα δεν τα κόβω.
Ετσι λοιπόν επιτρέψτε μου να δώσω εγώ την απάντηση:
Το LinQ query ήταν σωστό και κατόπιν κάποιων μετατροπων και ένεκα του ότι χρησιμιποιώ Devexpress controls ο κωδικας έγινε ώς εξής:
Dim OrderedMaterials = From Material In DatasetPurchases.Tables("SelectMaterialsPacking").AsEnumerable(), _
PurchasedMaterial In DatasetPurchases.Tables("PurchaseMaterials").AsEnumerable() _
Where PurchasedMaterial!MaterialID_FK = Material!MaterialID And _
PurchasedMaterial!PurchaseID_FK = ListBoxControlPurchases.SelectedValue _
Select Material!MaterialID, Material!MaterialMnemonic, Material!MaterialDescription, Material!PackingMnemonic
RepositoryItemLookUpEditMaterial.DataSource = OrderedMaterials.ToArray
RepositoryItemLookUpEditMaterial.DisplayMember = "MaterialMnemonic"
RepositoryItemLookUpEditMaterial.ValueMember = "MaterialID"
Thanks