Olhe isto é problemático, mas resolvi de uma forma que roda em qualquer resolução, pode não ser elegante, mas é bem prático, por que deixei de me preocupar com isto.
Tenho duas variáveis públicas do tipo Long
lHEIGHT E lWIDTH
Quando o sistema é acessado, ele verifica a resolução do monitor.
Faço tudo em 800X600.
Então, lHEIGHT e lWIDTH, valem 1 se a resolução for 800X600.
Caso contrário, efetuo a divisão da resolução:
lHEIGHT = (RESOLUÇÃO / 600)
lWIDTH = (RESOLUÇÃO / 800)
Pronto tenho a diferença dai ao carregar os Forms
Me. Height = (9000 * lHEIGHT)
Me.Width = (12000 * lWIDTH)
Ajustei os Forms.
Chamo uma função:
TAMANHO ' função que ajusta os objetos do Form.
Pronto terminado o problema.
vlu//