 the
     code buufer
      .Buf(i) = Val("&amp;H" &amp; Mid$(OPS, j, 2))               'Pull a pair of hex
       characters and convert to a byte
      j = j + 2                                           'Bump to the next
       pair of characters
    Next i                                                'Next byte of the
     code buffer
    
    nWndProc = VarPtr(.Buf(ARRAY_LB))                     'Address of the
     cWindow WndProc entry point
  End With
      
'Patch the WndProc code with runtime va