What are you trying to do with this code?

vb Code:
  1. Dim intIndex    As Integer
  2.    
  3.     If KeyAscii = vbKeyReturn Then
  4.         intIndex = 23
  5.         cmdCalc(intIndex).SetFocus
  6.         cmdCalc_Click intIndex
  7.     End If

press the "Enter" button when the "txt_Paper" has focus?