vb中调用VC编写的控件时，keydown事件被预先截获，如何让其执行我写的事件

Question

使用PreTranslateMessage时，VK＿DOWN成了焦点移动，我可以截获这一事件

Answer 1

switch (pMsg->message)
      {
         case WM_KEYDOWN:
         case WM_KEYUP:
 switch (pMsg->wParam)
            {
               case VK_UP:
               case VK_DOWN:
               case VK_LEFT:
               case VK_RIGHT:
               case VK_HOME:
               case VK_END:
                  SendMessage (pMsg->message, pMsg->wParam, pMsg->lParam);
                  // Windowless controls won't be able to call SendMessage.
                  // Instead, just respond to the message here.
                  return TRUE;
            }
            break;
      }
      return COleControl::PreTranslateMessage(pMsg);