jak zobrazit odpovídající záznam z přístupu na základě jiného sloupce v Datagrid ve vb6

Můžete použít dotaz takto:

SELECT subjectcode.Year1, subjectcode.Year2, 
       subjectcode.Subjectcode, subjectcode.Subjectname, 
       subjectcode.Theory_Practical, q.fee
FROM subjectcode 
INNER JOIN (
       SELECT fees.Year1, fees.Year2, "Theory" As FeeType, 
              fees.Theoryfee As Fee
       FROM fees
       UNION ALL
       SELECT fees.Year1, fees.Year2, "Practical" As FeeType, 
              fees.Practicalfee As Fee
       FROM fees)  AS q 
ON (subjectcode.Theory_Practical = q.FeeType) 
   AND (subjectcode.Year2 = q.Year2) 
   AND (subjectcode.Year1 = q.Year1)

Mnohem lépe byste však přepracovali svou tabulku poplatků tak, aby odpovídala údajům vráceným vnitřním SQL, tedy jiným řádkem pro teorii a praktické poplatky:

Year1   Year2   FeeType     Fee
2001    2003    Theory      440
2001    2003    Practical   320