Skip to content

Add Method

Description

Adds a key binding (accelerator key) for a command.

Syntax

Public Sub Add( _
    ByVal [fVirt] As Long, _
    ByVal [Key] As Long, _
    ByVal [Command] As Long _
)

Parameters

  • fVirt: Specifies whether the Control, Shift, and Alt keys are to be used for the key binding.
  • Key: The ASCII key for the key binding.
  • Command: The command ID which will be invoked when the accelerator is used.

Example

Shortcut Key Constants (Visual Basic)

Public Const FSHIFT = 4  
Public Const FCONTROL = 8  
Public Const FALT = 16  

Public Const VK_BACK = &H8  
Public Const VK_TAB = &H9  
Public Const VK_ESCAPE = &H1B  
Public Const VK_SPACE = &H20  
Public Const VK_PRIOR = &H21  
Public Const VK_NEXT = &H22  
Public Const VK_END = &H23  
Public Const VK_HOME = &H24  
Public Const VK_LEFT = &H25  
Public Const VK_UP = &H26  
Public Const VK_RIGHT = &H27  
Public Const VK_DOWN = &H28  
Public Const VK_INSERT = &H2D  
Public Const VK_DELETE = &H2E  
Public Const VK_MULTIPLY = &H6A  
Public Const VK_ADD = &H6B  
Public Const VK_SEPARATOR = &H6C  
Public Const VK_SUBTRACT = &H6D  
Public Const VK_DECIMAL = &H6E  
Public Const VK_DIVIDE = &H6F  
Public Const VK_F1 = &H70  
Public Const VK_F2 = &H71  
Public Const VK_F3 = &H72  
Public Const VK_F4 = &H73  
Public Const VK_F5 = &H74  
Public Const VK_F6 = &H75  
Public Const VK_F7 = &H76  
Public Const VK_F8 = &H77  
Public Const VK_F9 = &H78  

CommandBars.KeyBindings.Add FCONTROL, Asc("N"), ID_FILE_NEW  
CommandBars.KeyBindings.Add FCONTROL, Asc("O"), ID_FILE_OPEN  
CommandBars.KeyBindings.Add FCONTROL, Asc("S"), ID_FILE_SAVE  
CommandBars.KeyBindings.Add FCONTROL, Asc("X"), ID_EDIT_CUT  
CommandBars.KeyBindings.Add FCONTROL, Asc("C"), ID_EDIT_COPY  
CommandBars.KeyBindings.Add FCONTROL, Asc("V"), ID_EDIT_PASTE

See Also

Copyright (c) 1998-2024 Codejock Technologies. All rights reserved.