Тут
Как можно определить разрешение монитора текущего пользователя?
Написано, как узнать для первого, а для второго не работает
Попобовал поправить
| For Each mParam In mService.ExecQuery(""SELECT Sum(1) as n FROM Win32_DesktopMonitor"")
| nHeight = mParam.n
| nWidth = mParam.n
| rez = rez " + Ñèìâ(38) + " cStr(nWidth) " + Ñèìâ(38) +"""x""" + Ñèìâ(38) + " cStr(nHeight) " + Ñèìâ(38) + """z""
| Next
| GetWindowAttribute = rez
но все равно, не работает