+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 2 su 2

Attivare/disattivare caps lock da codice

  1. #1
    krossk2 non è in linea Scolaretto
    Post
    347
    Like Inviati  
    0
    Like Ricevuti  
    0
    ciao a tutti, mi chiedevo se era possibile attivare e/o disattivare il caps lock da codice. come potrei fare?
    Ultima modifica di elisab; 26-02-2011 19:10 
    ℹ️ Leggi di più su krossk2 ...

  2. #2
    krossk2 non è in linea Scolaretto
    Post
    347
    Like Inviati  
    0
    Like Ricevuti  
    0
    Quote Originariamente inviato da krossk2 Visualizza il messaggio
    ciao a tutti, mi chiedevo se era possibile attivare e/o disattivare il caps lock da codice. come potrei fare?
    EDIT: ho risolto, posto il codice che ho usato se dovesse servire a qualcuno...

    Imports System.Runtime.InteropServices
    
    Public Class Form1
    
      <DllImport("user32.dll", CallingConvention:=CallingConvention.StdCall, _
          CharSet:=CharSet.Unicode, EntryPoint:="keybd_event", _
          ExactSpelling:=True, SetLastError:=True)> _
      Private Shared Function keybd_event(ByVal bVk As Int32, ByVal bScan As Int32, _
                   ByVal dwFlags As Int32, ByVal dwExtraInfo As Int32) As Boolean
      End Function
    
      <DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Unicode)> _
      Private Shared Function GetKeyState(ByVal nVirtKey As Integer) As Short
      End Function
    
      Sub SetCapsLockKey(ByVal newState As Boolean)
        ' if the current state must be changed
        If CBool(GetKeyState(Keys.CapsLock)) <> newState Then
          ' programmatically press and release the CapsLock key
          keybd_event(Keys.CapsLock, 0, 0, 0)
          keybd_event(Keys.CapsLock, 0, &H2, 0)
        End If
      End Sub
    
      Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        SetCapsLockKey(True)
      End Sub
    
      Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        SetCapsLockKey(False)
      End Sub
    End Class
    
    ℹ️ Leggi di più su krossk2 ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Come attivare o disattivare un tasto con access
    Da A.Maurizio nel forum Microsoft Access
    Risposte: 5
    Ultimo Post: 15-02-2020, 08:36
  2. Risposte: 3
    Ultimo Post: 23-08-2019, 18:02
  3. Controllo Tasto Caps lock
    Da glak nel forum Visual Basic 6
    Risposte: 4
    Ultimo Post: 24-02-2010, 11:44
  4. StatusBar: Ins, Bloc Num, Caps Lock
    Da max1850 nel forum Visual Basic .Net
    Risposte: 8
    Ultimo Post: 16-01-2006, 10:56
  5. Disattivare/Attivare musica pag web
    Da Shumy300 nel forum HTML, CSS e JavaScript
    Risposte: 3
    Ultimo Post: 26-01-2005, 13:30