acesso negado

esse codigo é pra qndo dar enter dentro de um campo pular para o proximomas da uma mensagem de erro "acesso negado" qndo execut esse codigo, meu formulario ja esta com o key preview = true, alguem conhece algum motivo pra isso estar acontecendo?Private Sub Form_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then SendKeys "{TAB}" KeyAscii = 0End IfEnd Sub