Colocar form segun tamaño de la screen

[ジ]

buenas, pues ando en esas, necesito calcular el tamaño de cada monitor donde se ejecute mi aplicacion, para que muestre a la misma altura un formulario, osea que muestre tanto en un monitor de 15 pulgadas como en uno de 17 la aplicacion en el mismo sitio de la screen, ( 15 y 17 pulagadas lo puse como ejemplo de + y - ) pues eso es todo, salu2.

[LuckyMonkey]

ancho=screen.width / screen.twipsperpixelx
alto=screen.height  / screen.twipsperpixely

Eso considerando que tienes el scalemode a twips te dará la resolución actual.

[_Sergi_]

Bueno, lo que te ha dicho LuckyMonkey, "metido" en una función que devuelva una string procesada con la resolución y asegurandonos que está bien el scalemode sería algo así:

Código [Seleccionar] Expandir

Public Function ObtenerResolucion(Formulario as Form) As String
Formulario.Scalemode = vbTwips 'Ponemos el scalemode a twips
'Calculos
Ancho = Screen.Width / Screen.Twipsperpixelx
Alto = Screen. Width / Screen.Twipsperpixely
'Devolvemos el valor
ObtenerResolucion = "Resolución: " & Ancho & " x " & Alto & " píxeles"
End Function

Un saludo