Başlangıç > Kodlar > VB6’da Api kullanarak aktif klavyenin değiştirilmesi

VB6’da Api kullanarak aktif klavyenin değiştirilmesi


API kullarak sisteminizde yüklü bulunan aktif klavyeyi değiştirebilirisiniz.


Public Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, ByVal flags As Long) As Long


Private Sub Command1_Click()
Dim uzunluk As Long

'KLF_REORDER : Seçilebilecek klavye listesinin yeniden düzenlenmesini sağlıyor.
'HKL_NEXT : Listedeki aktif klavyeden bir sonraki klavyenin seçilmesi için gereken parametre.
'HKL_PREV : Listedeki aktif klavyeden bir önceki klavyenin seçilmesi için gereken parametre.

uzunluk = ActivateKeyboardLayout(HKL_NEXT, KLF_REORDER)
If (uzunluk <> 0) Then
Text1.Text ="Aktif klavye değiştirildi."
End If
End Sub

Reklamlar
  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: