Форумы HiProg.com - MS ACCESS, VBA, VB

ник: kot_k_k
если простое сравнение + сумма Asc-ки кодов символов - получится не плохо.

Запрос

SELECT Таблица3.Код, Таблица3.g1 FROM Таблица3 LEFT JOIN Запрос12 ON Таблица3.Код = Запрос12.Код WHERE (((Запрос12.g1) Is Null));

Запрос12---

SELECT Таблица3.g1, opo([g1])-opo([g2]) AS Выражение1, Таблица3.Код FROM Таблица3 LEFT JOIN Таблица4 ON Таблица3.g1 = Таблица4.g2 WHERE (((opo([g1])-opo([g2]))=0));

где

Function opo(ParamArray Ar()) Dim k, l, m, n As Variant Sum = 0 If Nz(Ar(0), "стоп") = "стоп"  Then       Sum = 0     Else For i = 1 To Len(Ar(0))     Sum = Sum + Asc(Mid(Ar(0), i, 1)) * i Next End If opo = Sum End Function

таблы
Таблица3
Код g1
1 aaa
2 aAa
3 aaA
4 ssss

Таблица4
Код g2
1 aaa
2 aAa

Запрос выдает

Код g1
3 aaA
4 ssss