Skip to main content

Keycode Visual Basic 6

Image
By

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

    'make sure KeyPreview is True on Form Properties

    On Error Resume Next

    Select Case KeyCode

        Case vbKey 'Then Find which key you want to use from the list below

            'Code to run when key is pressed

    End Select

End Sub

 

vbKeyLButton                   Left Mouse Button

vbKeyRButton                   Right Mouse Button

vnKeyCancel                      Cancel Key

vbKeyMButton                  Middle Mouse button

vbKeyBack                         Back Space Key

vbKeyTab                           Tab Key

vbKeyClear                         Clear Key

vbKeyReturn                      Enter Key

vbKeyShift                          Shift Key

vbKeyControl                      Ctrl Key

vbKeyMenu                         Menu Key

vbKeyPause                         Pause Key

vbKeyCapital                       Caps Lock Key

vbKeyEscape                       Escape Key

vbKeySpace                         Spacebar Key

vbKeyPageUp                     Page Up Key

vbKeyPageDown                Page Down Key

vbKeyEnd                            End Key

vbKeyHome                         Home Key

vbKeyLeft                            Left Arrow Key

vbKeyUp                              Up Arrow Key

vbKeyRight                          Right Arrow Key

vbKeyDown                         Down Arrow Key

vbKeySelect                        Select Key

vbKeyPrint                          Print Screen Key

vbKeyExecute                     Execute Key

vbKeySnapshot                   Snapshot Key

vbKeyInsert                        Insert Key

vbKeyDelete                        Delete Key

vbKeyHelp                           Help Key

vbKeyNumlock                    Delete Key

 

 

vbKeyA                                 through vbKeyZ are the key code constants for the alphabet

vbKey0                                 through vbKey9 are the key code constants for numbers

vbKeyF1                               through vbKeyF16 are the key code constants for the function keys

vbKeyNumpad0                  through vbKeyNumpad9 are the key code constants for the numeric key pad

 

Math signs are:

vbKeyMultiply                   Multiplication Sign (*)

vbKeyAdd                           Addition Sign (+)

vbKeySubtract                   Minus Sign (-)

vbKeyDecimal                    Decimal Point (.)

vbKeyDivide                       Division sign (/)

vbKeySeparator                 Enter (keypad) sign

 

 

 

Comments

Post a Comment

Popular posts from this blog

CheckBox dalam DataGridView VB.Net

By
Pada saat membuat aplikasi (VB.Net) untuk materi skripsi, terbesit bagaimana cara baru untuk memberikan hak akses user secara dinamis pada sistem. setelah dicoba dengan tanya-tanya. akhirnya bisa mendapatkan cara itu... wah sesuatu banget dah.... inti dari posting ini hanya pada barisan kode berikut : Private Sub BtnSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSIMPAN.Click         Dim Y As String = Mid(CmbUSER.Text, 1, 7)         Dim iROW As Integer         Dim AKSES As String         For iROW = 0 To DGVSample.Rows.Count - 1             'AksesBox = Nama CheckBox yang ada di DatagridView             If DGVSample.Rows(iROW).Cells("AksesBox").Value Then                 AKSES = "1"             Else                 AKSES = "0"             End If             'Class Proses DML (Simpan Data)             xSIMPAN.SIMPAN_AKSES(Y, DGVSample.Rows(iROW).Cells(1).Value, AKSES)         N
1 comment
Read more

LDAP In VB.Net

By
hey there friends,  here is this i would like to share another simple code in developing an application in VB.Net by now i would like to share how the way to use a LDAP (Lightweight Directory Access Protocol). at the time i need to develop a system which needs to use login user using domain user (ex: peoplename@company.co.id) no longer using user level in database. it is so confused to me to make it real at the time, because i never make it before. but this is the way how i make it happened. just make a simple form as below : next level : add another reference in your visual studio project (System.DirectoryService.dll) next : make a new class Imports System Imports System.Text Imports System.Collections Imports System.Security.Principal Imports System.DirectoryServices Public Class LDAPControlClass     Private NamaDomain As String = "company.co.id"     Private MemberOf As New List(Of String)     Public Function LoginLDAP(ByVal Username
Post a Comment
Read more