Connaitre la resolution de l'ecran


Commenter

Contenu du snippet

Comment faire pour connaître la résolution de l'affichage ?

Créez un Formulaire avec un Bouton ( Bouton1 )
Mettez ce code dans le Code de votre Formulaire

Source / Exemple : 


Private Sub Bouton1_Click()
    Largeur% = Screen.Width \ Screen.TwipsPerPixelX
    Hauteur% = Screen.Height \ Screen.TwipsPerPixelY
    MsgBox "Résolution de l'écran : " & Chr$(10) & Str$(Largeur%) + " x" + Str$(Hauteur%), vbInformation
End Sub

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (Nix)