Visual Basic 2010 da butona kısayol tuşu nasıl eklenir ?

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
S

shapethis

Üye
31 Ağu 2011
80
0
Arkadaşlar butona kısayol eklemeye çalışıyorum kaç gündür ama bir türlü yapamadım . Nasıl olacak ?
 
Tarihe göre sırala Oylara göre sırala
rapche89

rapche89

Uzman üye
15 Tem 2009
1,220
0
Bu Projede Visual Basic'te Koyduğumuz Buton Veya CheckBox İçin Kısayol Eklemeyi Yani HotKeys Nasıl Eklenir Onu Göreceğiz.




Projeye Başlamadan Önce Forma
2 Adet CommandButton
2 Adette Timer Ekleyelim
Timer1 Enabled Kısmını = True ve İnterval Kısmını 100 Yapınız.
Timer2 Enabled Kısmını = False ve İntervalini 100 Yapınız.

Daha Sonra Formun (General) Üst Kısmına Aşağıdaki Code Yapıştırın.

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Sonra Forma Aşağıdaki Codeleri Yapıştırın.

Private Sub Command1_Click()
Timer2.Enabled = True
End Sub

Private Sub Command2_Click()
Timer2.Enabled = False

End Sub


Private Sub Timer1_Timer()
If GetAsyncKeyState(vbKeyZ) Then Command1_Click
If GetAsyncKeyState(vbKeyA) Then Command2_Click
End Sub

Private Sub Timer2_Timer()
SendKeys ("toprak")
End Sub

Kırmızı Harfler Kısayol Tuşlarıdır Kendinize Göre Ayarlıyabilirsiniz.

Alıntıdır..
 
Oyla 0 Downvote
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.