Skip to main content

AccessTr.neT


Fonksiyon Tuşları Kullanımı

Fonksiyon Tuşları Kullanımı

#1
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ı;
[Resim: do.php?img=6165]
[Resim: do.php?img=6166]

Diğer Ascı kodları İçin
Konu hakkında yardımcı olan herkese şimdiden çok teşekkürler.
Saygılar...
Dünyada Yetirince Anlaşılır Dile Konuşan İnsanlar Var Birazcık da Anlaması İçin Düşünmesi Gerekiyor İnsanların
Cevapla
#2
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.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
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
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
#4
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  Img-grin

kod ile ilgili şunu da sormak istiyorum;
Kod:
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

burada kombine iki tuş kullanıyoruz ek olarak mesala 3 kombine tuş kullanmak istersek nasıl bir ekleme yapabiliriz.
Kod:
If (e.KeyCode And Not Keys.Modifiers) = Keys.E And Keys.Shift AndAlso e.Modifiers = Keys.Control Then
            MessageBox.Show("Ctrl + Shift + E tuşlarına bastınız")
        End If

Ş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.
Dünyada Yetirince Anlaşılır Dile Konuşan İnsanlar Var Birazcık da Anlaması İçin Düşünmesi Gerekiyor İnsanların
Cevapla
#5
sayın ustaoglu,

Kod:
If (e.Control And e.Shift) AndAlso e.KeyCode = Keys.E Then
        MessageBox.Show("Ctrl+Shift+E")
End If

kod ifadelerini deneyiniz.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#6
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
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task