Monday, November 26, 2012

Sharing Everything From My Experience And Knowlegde

Sharing Everything From My Experience And Knowlegde

Cara membuat Shortcut/Multikey(CTRL,ALT,SHIFT)/Hotkey(F1,F2,F3...) VBNET

Posted: 26 Nov 2012 03:55 AM PST

bagi anda yang belum tahu cara membuat dan membaca hotkey khusunya di VBNET saya akan berikan sedikit contohnya. Untuk apa sih hotkey/sortcut itu? fungsinya? jadi tujuan utamanya adalah mempermudah dan mempercepat penginputan pada suatu form (full keyboard). Jadi tidak perlu report harus click new, save, atau pun cancel jadi jari kita tetap pada keyboar (tidak harus pindah ke mouse). Hal ini akan sangat TERASA manfaatnya jika data yang diinput sangat banyak !!!. contohnya seperti ini : New=F2, Save=F5, Cancel=F6 dan Close=F7.
Sintaknya adalah :
Letakan property ini di event form_load


Private Sub Form1_Load(ByValsender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load
        Me.KeyPreview = True
End Sub

kemudian simpan semua sintak new, save, cancel, close anda di event form_keydown

Private Sub Form1_KeyDown(ByValsender As Object, ByVal e AsSystem.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Select Case e.KeyCode
            CaseKeys.F2 'new
                '...sintak anda
            CaseKeys.F5 'save
                '...sintak anda
            CaseKeys.F6 'cancel
                '...sintak anda
            CaseKeys.F7 'close
                '...sintak anda
        End Select
End Sub
 
atau anda bisa menulisnya seperti ini :


Private Sub Form1_KeyDown(ByValsender As Object, ByVal e AsSystem.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Select Case e.KeyValue
            Case113 'new
                '...sintak anda
            Case116 'save
                '...sintak anda
            Case117 'cancel
                '...sintak anda
            Case118 'close
                '...sintak anda
        End Select
End Sub

Berikut ini daftar keyvalue dari F1 sampai F12 :
112 = F1
113 = F2
114 = F3
115 = F4
116 = F5
117 = F6
118 = F7
119 = F8
120 = F9
121 = F10
122 = F11
123 = F12

Jika anda ingin menggabungkan KEY seperti CTRL+S atau ALT+A atau ALT+SHIFT+D atau terserah anda, maka cukup tulis codenya seperti ini (contoh CTRL+SHIFT+ALT+Z) :


Private Sub Form1_KeyDown(ByValsender As Object, ByVal e AsSystem.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
    If e.Alt And e.Shift Ande.Control And e.KeyCode = Keys.Z Then
        MessageBox.Show("OK !!!")
    End If
End Sub
 

Tags:
cara memuat sortcut tombol di vbnet, cara membuat hotkey di vbnet, cara membuat dan membaca hotkey vbnet, cara menekan tombol f1, f2, f3, f4, f5, f6 , f7, f8, f9, f10 , f11, f12 di vbnet, how to make shortcut keys in vb.net,VB.Net - hot key specific button, VB.NET Keyboard Shortcut - VB.NET, How to Assign Keyboard Keys for VB, cara membuat multi key, cara cek tombol ctrl, cara cek tekan tombol alt, cara cek tomcol shift, cara baca tombol control+alt+shift, how to create hotkey,
Posted by at

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)