Meilleur auteur de réponses
probleme developement

Question
-
Bonjour,
je voudrais developer un programme qui me permettrais de cliquer sur un certain endroit a une certaine heure. J'ai la position de ma souris mais le seul probleme c'est que des le debut je ne sais pas quoi faire.
merci
P.S: ce n'est pas mon premier programme en vba.
Réponses
-
Bonjour Black-Jack n° 91,
Ce code répond sans doute à ta demande :
Option Explicit On Public Class Form1 Dim eX, eY As Integer Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Me.WindowState = FormWindowState.Maximized End Sub Sub Form1_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick MsgBox("Clique" & vbLf & vbLf & "colonne " & eX & " : ligne " & eY) End Sub Sub Form1_MouseMove(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove eX = e.X eY = e.Y End Sub End Class
Par contre, pour la "certaine heure" c'est toi qui décides...
Sinon, ici c'est du vbNet, pas du vbA, suite à ce que tu écris in fine.
Cordialement.
Joseph Attila PUSZTAY
EhJoe Logiciels Romans Ecrire- Proposé comme réponse EhJoe jeudi 7 juin 2012 11:04
- Marqué comme réponse Ciprian Duduiala lundi 11 juin 2012 09:00
-
Attention aussi à la résolution Windows. LEs X et Y risquent de ne pas être les bons. Maintenant, faudrait savoir exactement ce que vous voulez faire.
Richard Clark
Consultant - Formateur .NET
http://www.c2i.fr
Depuis 1996: le 1er site .NET francophone- Marqué comme réponse Ciprian Duduiala lundi 11 juin 2012 09:00
Toutes les réponses
-
Bonjour Black-Jack n° 91,
Ce code répond sans doute à ta demande :
Option Explicit On Public Class Form1 Dim eX, eY As Integer Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Me.WindowState = FormWindowState.Maximized End Sub Sub Form1_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick MsgBox("Clique" & vbLf & vbLf & "colonne " & eX & " : ligne " & eY) End Sub Sub Form1_MouseMove(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove eX = e.X eY = e.Y End Sub End Class
Par contre, pour la "certaine heure" c'est toi qui décides...
Sinon, ici c'est du vbNet, pas du vbA, suite à ce que tu écris in fine.
Cordialement.
Joseph Attila PUSZTAY
EhJoe Logiciels Romans Ecrire- Proposé comme réponse EhJoe jeudi 7 juin 2012 11:04
- Marqué comme réponse Ciprian Duduiala lundi 11 juin 2012 09:00
-
Attention aussi à la résolution Windows. LEs X et Y risquent de ne pas être les bons. Maintenant, faudrait savoir exactement ce que vous voulez faire.
Richard Clark
Consultant - Formateur .NET
http://www.c2i.fr
Depuis 1996: le 1er site .NET francophone- Marqué comme réponse Ciprian Duduiala lundi 11 juin 2012 09:00