Cacher le curseur de la souris

Soyez le premier à donner votre avis sur cette source.

Vue 13 980 fois - Téléchargée 737 fois

Description

Comment cacher le Curseur de la Souris ?

Mettez ce Code dans le Module de Votre Formulaire :

Source / Exemple :


Public Declare Function ShowCursor Lib "user32" Alias "ShowCursor" (ByVal bShow As Long) As Long

Private Sub Form_Load()
     ShowCursor False
End Sub

' Pour Faire réapparaitre la souris, utiliser ce code (dans un bouton par ex ) :
     ShowCursor False

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

diablamanshadow
Messages postés
420
Date d'inscription
lundi 30 août 2004
Statut
Membre
Dernière intervention
28 janvier 2008
-
en faite ses pas la position ses juste que sa disparait que quand la souris et dans la form quand ses a l'exterieur sa marche plus ;-)
nycoss
Messages postés
86
Date d'inscription
lundi 17 novembre 2003
Statut
Membre
Dernière intervention
9 mars 2006
-
esque c'est normal que ca marche qu'a moitier?parceque chez moi le curseur ne disparait pas tout le temp, sa depend de l'endroit ou il se positionne
RaptorX
Messages postés
20
Date d'inscription
dimanche 24 mars 2002
Statut
Membre
Dernière intervention
21 octobre 2003
-
Correction pour faire réapparaître: ShowCursor True
Mauvaise ligne de code : Private Sub CacherSourisBtn_Click(Index As Integer)
Mauvaise ligne de code : Private Sub CacherSourisBtn_Click(Index As Integer)

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.