Invalid procedure call or argument... What is wrong with this code?

[reisve]

Hi I have this code:

1 Private Sub Form_Resize()
2    If UseCommBox <> 0 Then
3      txtTerm.Move 0, 0, frmTerminal.ScaleWidth, frmTerminal.ScaleHeight - sbrStatus.Height - txtSendText.Height
4       txtSendText.Move 0, txtTerm.Height, frmTerminal.ScaleWidth, 315
5    ElseIf UseCommBox = 0 Then
6       txtTerm.Move 0, 0, frmTerminal.ScaleWidth, frmTerminal.ScaleHeight - sbrStatus.Height
7     End If
8 End Sub

everytime I ru the application, the form resizes ok, but gives me this error message:

Run-time error '5':
Invalid procedure call or argument

Any ideas why?

Thanks

Virginio