C# / VB.NET - Simulare pressione tasti

Forum - C# / VB.NET - Simulare pressione tasti

cyber (Normal User)
Rookie

Messaggi: 51
Iscritto: 03/11/2006

Postato alle 14:53
Mercoledì, 18/07/2007

Io vorrei simulare la pressione di un tasto sulla tastiera l' "1" accanto a "\"..

Per quello che devo fare non funziona sendkeys e questa altro codice nemmeno. Devo simulare la pressione per qualsiasi programma proprio come se lo premessi.
Ho provato anche questo

Codice sorgente - presumibilmente VB.NET

Imports System.Runtime.InteropServices
 
Public Class Form1
 
    <DllImport("user32.dll", CallingConvention:=CallingConvention.StdCall, CharSet:=CharSet.Unicode, EntryPoint:="keybd_event", ExactSpelling:=True, SetLastError:=True)> Public Shared Sub keybd_event(ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Const KEYEVENTF_KEYUP As Byte = &H2
 
        keybd_event(AscW(Chr(49)), 0, 0, 0)               ' Generates a KEY_DOWN
        keybd_event(AscW(Chr(49)), 0, KEYEVENTF_KEYUP, 0) ' Generates a KEY_UP
 
    End Sub
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
    End Sub
End Class

Che altro posso fare?

questo nn va per il programma che uso nn mi spinge "1"

Ultima modifica effettuata da cyber il 18/07/2007 alle 14:54

Il Totem (Admin)
Guru^2

Messaggi: 3635
Iscritto: 24/01/2006

Postato alle 10:09
Giovedì, 19/07/2007

Perchè non provi ad usare keybd_event(asc("1"),0,0,0)?