Comment savoir la résolution d'écran genre 1024x768 ????

vbman - 16 sept. 2001 à 19:51
bastientelecom Messages postés 28 Date d'inscription vendredi 10 mars 2006 Statut Membre Dernière intervention 1 mars 2007 - 16 janv. 2007 à 19:38
Comment on fait pour savoir la résolution de l'écran ??? :-p

3 réponses

Private Sub Form_Load()

Dim X As Long
Dim Y As Long

' Largeur
X = (Screen.Width \ Screen.TwipsPerPixelX)
' Hauteur
Y = (Screen.Height \ Screen.TwipsPerPixelY)

MsgBox "Voila la résolution de l'écran: " & Chr$(13) & Chr$(13) & X & "x" & Y, vbOkOnly + vbInformation, "Résolution"

End Sub
0
cs_doboulan Messages postés 10 Date d'inscription samedi 26 juillet 2003 Statut Membre Dernière intervention 7 janvier 2006
13 oct. 2003 à 15:55
Enfin une réponse claire et précise!

Cela peut paraître évident pour des chevronnés mais pour des débutants, je vous garantie que ce n'est pas aussi simple

MERCI

Dominique
0
bastientelecom Messages postés 28 Date d'inscription vendredi 10 mars 2006 Statut Membre Dernière intervention 1 mars 2007
16 janv. 2007 à 19:38
Salut,
Moi ça ne marchait pas ça. Alors j'ai fait :
Dim longueur As Integer = Screen.GetBounds(Me).Right

Dim largeur As Integer = Screen.GetBounds(Me).Bottom

Et voilà !!!

Pour utiliser ces fonctions faut faire  :

Imports System.Windows.Forms.Screen
0
Rejoignez-nous