hur man visar motsvarande post från åtkomst baserat på annan kolumn i Datagrid i vb6

Du kan använda en fråga som så:

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)

Du skulle dock vara mycket bättre av att omforma din avgiftstabell för att matcha data som returneras av den inre sql, det vill säga en annan linje för teori och praktiska avgifter:

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