Favorilerine Ekle | Giriş Sayfan Yap | Tavsiye Et

 

Kurs Tanıtım Sayfası | Süper Üye Kimdir? | Menü Tasarımı Konulu Örnek Ders
Kod İndir| Hazır Kodlar | Makaleler| İpuçları | VB .NET Kursu | Dersler | Forum | Alt Bölümler | Servisler
    Merhaba Misafir
    anasayfa » visual basic makaleleri » KLAVYEDE HER TUŞ İÇİN GEREKLİ KODLAR
Üye Girişi
Kullanıcı Adı:  
Şifre : 
Kaydet ?
Siteden tam olarak faydalanabilmek için üye olmalısınız.
Unuttuğunuz şifrenizi öğrenebilmek için kayıt sırasında verdiğiniz Hatırlatma Cevabı'nı bilmeniz gereklidir.
Şifre hatırlatma işlevini sadece 3 defa kullanma hakkınız vardır.
Kullanıcı adını ve şifresini unutan üyelere email ile yardım verilmez.

Aktivasyon Gelmedi mi?Aktivasyon mesajınız email adresinize gelmedi mi?
Buraya tıklayarak bir kez daha aktivasyon mesajı gönderilmesini sağlayabilirsiniz.
Lütfen email hesabınızın BULK ve SPAM klasörlerini de kontrol ediniz.
Rastgele Makale

asp.net

Yazar: ramazan86
asp dosyalar?n? asp.net çevirme


Webmasterlar
Sitenize Ekleyin!
Sitenizde "Son Eklenen 10 Visual Basic Yazısı"'nı göstermek ve içeriğini zenginleştirmek için buraya tıklayınız.

Vbasicmaster.com'a link verin!
Aşağıdaki minik banneri sitenize eklemek için tıklayın!

Çevrimiçi Üyeler
Kaanstagram

Üye Sayısı:
Ziyaretçiler nerede?
Yayın № : 2409
Yayın Tar:21.03.2005
Yazar : loeb
Hit :4540

Bu Yazarın Yazıları Sadece bu yazarın  göster
Bu Yazıyı Tavsiye Et

VERSION 5.00
LOEB

lovworldix@yahoo.co.uk

##################Kod dükümantasyonu##################
KLAVYE TUŞLARININ ÖZEL KODLARLA KULLANILMASI:

Burada kodun nasıl yazılacağı anlatılmıştır.

Bu kodu form code kısmına yazın ve textbox kutusu ekleyip kodu bitirin

Option Explicit
Const KEY_F1 = &H70
Const KEY_F2 = &H71
Const Key_F3 = &H72
Const KEY_ESCAPE = &H1B

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case KEY_F1: Text1.Text = Date$ ' F1 tuşuna basıldığında metin kutusundaki metin
' silinsin ve yerine tarih atansın.
Case KEY_F2: Text1.Text = Time$ 'F2 tuşu ise metin kutumuza zamanı yazsın
Case Key_F3: Text1.Text = "Visual basic"
Case KEY_ESCAPE: Unload Me ' ESC tuşumuz ise aktif formu bellekten atsın.
End Select

End Sub

Yukarıdaki örnekte &H70 dediği zaman F1 tuşu oluyor. Ama aşağıdaki tuş kodlarında F1 için şöyle demiş 0x70 demiş. Bu (0x) kısmını siz Visual Basic'e yazarken &H deyip diğer iki rakamı giriniz. Yani &H70 gibi

Örnek Ctrl için &H11 aslında aşağıda 0x11 diye geçiyor.

Bununla birlikte (a,b,...) lar için ise sadece sayıyı yazın örnek A için 6 gibi.

##################HER TUŞ İÇİN GEREKLİ KODLARI#######################

Constant Value Description

vbKeyLButton 0x1 Left mouse button
vbKeyRButton 0x2 Right mouse button
vbKeyCancel 0x3 CANCEL key
vbKeyMButton 0x4 Middle mouse button
vbKeyBack 0x8 BACKSPACE key
vbKeyTab 0x9 TAB key
vbKeyClear 0xC CLEAR key
vbKeyReturn 0xD ENTER key
vbKeyShift 0x10 SHIFT key
vbKeyControl 0x11 CTRL key
vbKeyMenu 0x12 MENU key
vbKeyPause 0x13 PAUSE key
vbKeyCapital 0x14 CAPS LOCK key
vbKeyEscape 0x1B ESC key
vbKeySpace 0x20 SPACEBAR key
vbKeyPageUp 0x21 PAGE UP key
vbKeyPageDown 0x22 PAGE DOWN key
vbKeyEnd 0x23 END key
vbKeyHome 0x24 HOME key
vbKeyLeft 0x25 LEFT ARROW key
vbKeyUp 0x26 UP ARROW key
vbKeyRight 0x27 RIGHT ARROW key
vbKeyDown 0x28 DOWN ARROW key
vbKeySelect 0x29 SELECT key
vbKeyPrint 0x2A PRINT SCREEN key
vbKeyExecute 0x2B EXECUTE key
vbKeySnapshot 0x2C SNAPSHOT key
vbKeyInsert 0x2D INSERT key
vbKeyDelete 0x2E DELETE key
vbKeyHelp 0x2F HELP key
vbKeyNumlock 0x90 NUM LOCK key
The A key through the Z key are the same as the ASCII equivalents A ? Z:

Constant Value Description
vbKeyA 65 A key
vbKeyB 66 B key
vbKeyC 67 C key
vbKeyD 68 D key
vbKeyE 69 E key
vbKeyF 70 F key
vbKeyG 71 G key
vbKeyH 72 H key
vbKeyI 73 I key
vbKeyJ 74 J key
vbKeyK 75 K key
vbKeyL 76 L key
vbKeyM 77 M key
vbKeyN 78 N key
vbKeyO 79 O key
vbKeyP 80 P key
vbKeyQ 81 Q key
vbKeyR 82 R key
vbKeyS 83 S key
vbKeyT 84 T key
vbKeyU 85 U key
vbKeyV 86 V key
vbKeyW 87 W key
vbKeyX 88 X key
vbKeyY 89 Y key
vbKeyZ 90 Z key
The 0 key through 9 key are the same as their ASCII equivalents 0 ? 9:

Constant Value Description

vbKey0 48 0 key
vbKey1 49 1 key
vbKey2 50 2 key
vbKey3 51 3 key
vbKey4 52 4 key
vbKey5 53 5 key
vbKey6 54 6 key
vbKey7 55 7 key
vbKey8 56 8 key
vbKey9 57 9 key
The following constants represent keys on the numeric keypad:

Constant Value Description
vbKeyNumpad0 0x60 0 key
vbKeyNumpad1 0x61 1 key
vbKeyNumpad2 0x62 2 key
vbKeyNumpad3 0x63 3 key
vbKeyNumpad4 0x64 4 key
vbKeyNumpad5 0x65 5 key
vbKeyNumpad6 0x66 6 key
vbKeyNumpad7 0x67 7 key
vbKeyNumpad8 0x68 8 key
vbKeyNumpad9 0x69 9 key
vbKeyMultiply 0x6A MULTIPLICATION SIGN (*) key
vbKeyAdd 0x6B PLUS SIGN (+) key
vbKeySeparator 0x6C ENTER key
vbKeySubtract 0x6D MINUS SIGN (?) key
vbKeyDecimal 0x6E DECIMAL POINT (.) key
vbKeyDivide 0x6F DIVISION SIGN (/) key
The following constants represent function keys:

Constant Value Description

**vbKeyF1 0x70 F1 key**
vbKeyF2 0x71 F2 key
vbKeyF3 0x72 F3 key
vbKeyF4 0x73 F4 key
vbKeyF5 0x74 F5 key
vbKeyF6 0x75 F6 key
vbKeyF7 0x76 F7 key
vbKeyF8 0x77 F8 key
vbKeyF9 0x78 F9 key
vbKeyF10 0x79 F10 key
vbKeyF11 0x7A F11 key
vbKeyF12 0x7B F12 key
vbKeyF13 0x7C F13 key
vbKeyF14 0x7D F14 key
vbKeyF15 0x7E F15 key
vbKeyF16 0x7F F16 key

Yukarıdaki örnek yazılım:
$$$$$$$$$$$$$$$$ÖRNEK YAZILIM$$$$$$$$$$$$$$$$$$$$$$$$$$$

Option Explicit
Const KEY_F1 = &H70
Const KEY_F2 = &H71
Const Key_F3 = &H72
Const KEY_ESCAPE = &H1B

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case KEY_F1: Text1.Text = Date$ ' F1 tuşuna basıldığında metin kutusundaki metin
' silinsin ve yerine tarih atansın.
Case KEY_F2: Text1.Text = Time$ 'F2 tuşu ise metin kutumuza zamanı yazsın
Case Key_F3: Text1.Text = "Visual basic"
Case KEY_ESCAPE: Unload Me ' ESC tuşumuz ise aktif formu bellekten atsın.
End Select

End Sub
SL




Yorumlar, eklemeler ve düşünceler
        Güzel bir uygulama.Saol kardeş

   DAGARSLAN, 22.03.2005 09:04
   Ben çalıştıramadım kardeş.en başta anlattığın gibi f1'e basınca text1'de bişey olmuyor, yoksa ben mi anlamadım yardımcı olur musun.Teşekkürler.

   sunasoft, 03.01.2006 00:51
   fORMUN KEYPREVIEW ini true yaparsan calışacaktır

   trgerman1, 20.11.2006 00:18
   kredim kalmadı bakamıyourum :(

   bayfirat, 29.07.2007 14:41
© Hakan Ersöz 2000-2013| Üyelik Sözleşmesi | | Ödeme Bildirimi
Sitemizden yenilikleri hemen öğrenin, pop upları engelleyin, chat yapın... ToolBarımızı indirin:
Vasicmaster Toolbar'ı indirin