Afficher sur une image dans userform un curseur en croix qui touche aux bords

Bonjour,

J'aimerai avoir un curseur en croix qui touche aux bords de mon image. Il serait constitué de deux barres, une verticale et une horizontale avec pour centre ma souris.
Cela me servirait pour la lecture de graphiques

Merci par avance à ceux qui veulent ien me répondre

Eleasias

Salut,

Défois que :

Private Sub Form_Load()
Me.MousePointer = 2
End Sub

A toi par la suite à placer ton curseur à l'endroit désiré...

A+
Exploreur

 Linux a un noyau, Windows un pépin

Un jeu en flash sympa...? Voir ici
Si vous voulez vous inscrire
mettez comme parrain : exploreur

D'abord merci de ta réponse mais ce n'est pas exactement ce que je veux.

Je me suis probablement mal expliqué : ce que tu m'as donné change seulement le curseur de forme.

Je voudrais la forme croix comme tu m'a donné mais dont les extrémités verticales et horizontales ne mesurent pas 10 pixels. Il me faudrait une croix dont les extrémités touchent les bords de mon image (avec une taille à rallonge suivant l'endroit où l'on se place).

J'espère que je me suis bien exprimé, merci d'avance

Eleasias

Re,

Ah..oui...un peu comme les logiciels de dessins indus...? Mais là, je ne sais pas.

A+
Exploreur

 Linux a un noyau, Windows un pépin

Un jeu en flash sympa...? Voir ici
Si vous voulez vous inscrire
mettez comme parrain : exploreur

(Désolé j'ai quelques bugs je crois)

Oui c'est bien cela, c'est pour trouver une abscisse avec une ordonnée ou vice et versa sur un graphe en jpeg

Eleasias

J'espère que quelqu'un pourra m'aider et surtout que j'ai été assez clair.
Je suis débutant en VBA et j'espère que ce n'est pas d'un niveau trop élevé pour moi.

(Comment je fais pour supprimer mon message raté s'il vous plaît)

Eleasias

MousePointer a mettre en custom
ainsi, VB utilisera l'image MouseIcon comme curseur.

Oui mais je voudrais un curseur très grand (qui touche aux 4 côtés d'une image 270*486) et qui ne dépasse pas de l'image .
Le centre de la croix (comme un curseur cross) sera le pointé de la souris.

Eleasias

ah, ok, j'avais pas vu ca ainsi.

déplace des controles Line en fonction des coordonnées de la souris (MouseMove)

en gros :


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Line1.X1 = X
    Line1.X2 = X
    
    Line2.Y1 = Y
    Line2.Y2 = Y
End Sub

Euh ca c'est une macro esclave nan?
Il faut l'appeler de ma fenêtre qui fixe mes paramètres d'image mais les valeurs Button, Shift, X et Y je ne vois pas comment les incrémenter.De plus que définis-tu par Button et Shift?
Merci pour ton aide.

Eleasias