What am I doing wrong?

Can anyone tell me what is wrong with this code, please?

VB Code:

If Counter < 2 AndAlso txtSin.Text <> "" Then Sine = CDbl(txtSin.Text)
            Counter += CByte(1)
           elseIf Counter < 2 AndAlso txtCos.Text <> "" Then Cosine = CDbl(txtCos.Text)
 
            End If

Both the ElseIf and End If statements have the blue squiggly lines under them with the tooltip saying they must be preceded by a matching If statement :confused: :confused: :confused:

Move Sine = CDbl(txtSin.Text) to a new line.

Code:

---

                        If Counter < 2 AndAlso txtSin.Text <> "" Then
                            Sine = CDbl(txtSin.Text)
                            Counter += CByte(1)
                        ElseIf Counter < 2 AndAlso txtCos.Text <> "" Then
                            Cosine = CDbl(txtCos.Text)

                        End If

---

Thanks guys, I just spotted it myself :o :o :o

I think I've had one beer too many for any more programming tonight :D :D