AccessTr.neT

Herkese merhaba;

vb.nette üzerinde çalıştığım uygulamamda fonksiyon tuşlarını kullanmak istiyorum.
F1 - F12 veya enter, esc gibi tuşları tek başına kullana biliyorum.

If e.KeyCode = Keys.F2 Then

Msgbox("F2 tuşuna basıldı",vbInformation)

End If



If e.KeyCode = Keys.Enter Then

TextBox1.Focus()

End If

Gibi 
ben birde örneğin Ctrl + P gibi kombinasyon tuşlarını da kullanmak istiyorum.
Örneğin; Ctrl + P ile baskı ön izleme formunu açmak gibi ancak bir türlü başaramadım.
İnternetteki araştırmama göre tuşların ascı kodları ile yapmak gerekiyor bu işlemi C# için verilen bir örneğe göre de kod dizimi şu şekilde olmalı;
Örneğin CTRL + F4 için,

If e.KeyCode = Keys.^ + {F4} Then 

Form1.Close()

End If 

Ancak bu şekilde kod kabul etmemekte C#/Vb.Net iki içinde bence de bir mantık hatası mevcut ancak nasıl olması gerektiğini bir türlü yapamadım internette de bu işlem için örnek bulamadım.

Microsoft'un sitesinden bulmuş olduğum ascı kodları;



Diğer Ascı kodları İçin
Konu hakkında yardımcı olan herkese şimdiden çok teşekkürler.
Saygılar...

sayın ustaoglu,

bahsettiğiniz talebinize yönelik olarak;

aşağıda bağlantısı yazılı vb.net üzerine konuları da inceleyebilirsiniz,faydalı olması temennisi ile.

Keys Enumeration

KeyEventArgs.KeyCode Özellik

KeyEventArgs Class

bilginize...iyi çalışmalar,saygılar.

Formun özelliklerinden KeyPreview açıktır nitekim fonksiyon tuşlarını kullanabiliyormuşsunuz.

Form olaylarından KeyDown olayına gelin ve aşağıdaki kodları yapıştırın:

If (e.KeyCode And Not Keys.Modifiers) = Keys.P AndAlso e.Modifiers = Keys.Control Then

            MessageBox.Show("Ctrl + P tuşlarına bastınız")

        End If

Sayın atoz112 ve alpeki99 hocam;

Değerli yorumlarınız ve yardımlarınız için çok teşekkür ederim.

tam aradığım kodu vermişsiniz hocam  

kod ile ilgili şunu da sormak istiyorum;
burada kombine iki tuş kullanıyoruz ek olarak mesala 3 kombine tuş kullanmak istersek nasıl bir ekleme yapabiliriz.

Şeklinde denedim ancak olmadı bununla yapmayı düşündüğüm örneğin bir kaydın tamamen silinmesi ve ya iptal edilmesi için kullanmayı planlıyorum.
Tekrar teşekkür ederim.

sayın ustaoglu,


kod ifadelerini deneyiniz.

bilginize...iyi çalışmalar,saygılar.

Burada farklı bir kullanım söz konusu. Önce Case ile hangi harfe basıldığını kontrol edeceksiniz sonra altında If ile diğer tuşları kontrol edeceksiniz.

        Select Case e.KeyCode

            Case Keys.E

                If (e.Control AndAlso e.Shift) Then

                    MsgBox("Control + Shift + E tuşlarına bastınız")

                End If

        End Select