help me имитация клика мыши VB.net << На главную или назад  

4 ответов в теме “help me имитация клика мыши VB.net”

1. 4
   Фёдор Фёдорович ответил:
   1 апреля 2010 в 18:01

   а теперь переводим на vb.net : //www.developerfusion.com/tools/convert/vb-to-c...

2. 3
   Инсаф Сагет ответил:
   31 марта 2010 в 14:02

   СПС)

3. 2
   Юрий Пискунов ответил:
   31 марта 2010 в 10:03

   )))

   using System;
   using System.Windows.Forms;
   using System.Runtime.InteropServices;

   public class Form1 : Form
   {
   [DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
   public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

   private const int MOUSEEVENTF_LEFTDOWN = 0×02;
   private const int MOUSEEVENTF_LEFTUP = 0×04;
   private const int MOUSEEVENTF_RIGHTDOWN = 0×08;
   private const int MOUSEEVENTF_RIGHTUP = 0×10;

   public Form1()
   {
   }

   public void DoMouseClick()
   {
   //Call the imported function with the cursor's current position
   int X = Cursor.Position.X;
   int Y = Cursor.Position.Y;
   mouse_event(MOUSEEVENTF_LEFTDOWN | MOUSEEVENTF_LEFTUP, X, Y, 0, 0);
   }

   //…other code needed for the application
   }

   это С#, но смысл остаётся прежним и в vb.net.
   The mouse_event function synthesizes mouse motion and button clicks.(user32.dll)

4. 1
   Денис Гублин ответил:
   30 марта 2010 в 23:05

   имитация – скверная штука
   начнешь с щелчка мышкой, закончишь оргазмом)