Définition du moniteur

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 186 fois - Téléchargée 36 fois

Contenu du snippet

L'objet Screen ainsi que ses propriétés Width et Height permettent de connaîte les dimensions de l'ecran exprimées en twips.

Via ses propriétés Screen.TwipsPerPixelX et Screen.TwipsPerPixelY, nous pouvons obtenir la définition en pixel...

Source / Exemple :


Dim ResoX, ResoY As Integer

ResoX = Screen.Width / Screen.TwipsPerPixelX
ResoY = Screen.Height / Screen.TwipsPerPixelY

MsgBox ("Résolution : " & ResoX & "/" & ResoY)

Conclusion :


Bonne programmation...

A voir également

Ajouter un commentaire

Commentaire

toolsfortrader
Messages postés
2
Date d'inscription
samedi 15 février 2003
Statut
Membre
Dernière intervention
8 octobre 2003
-
Je pense qu'il y a une petite erreur dans la définition des variables :
Dim ResoX As Integer, ResoY As Integer

Merci pour ce code

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.