Visual Basic

[Sedes]

OK, 'k heb morgen examen visual basic en al een paar vragen hoort van de andere groepen:

één ervan: Een programma dat test of een woord een palindroom is (bv lepel)

ik raak dus echt niet aan de oplossing
Wat ik momenteel heb:

Private Sub Command1_Click()
Dim tekst As String
Dim result As Integer
Dim i As Integer
tekst = Text1.Text
result = 0
n = Len(tekst) \ 2

For i = 0 To n
If Left(tekst, i) = Right(tekst, i) Then
result = result + 1
Else
End If
Next i
If result = n Then
MsgBox "ja"
Else
MsgBox "nee"
End If
End Sub

dit werkt dus enkel maar voor woorden met 4 letters (had gedacht ook voor 6letters maar blijkbaar dus niet :s)

Dus mensen die vb kennen, help me

*edit* klein foutje gemaakt moest integerdeling zijn ipv gewone deling...
maaaar nu werkt het wel voor 4,5,6 letter woorden maar dus nog niet voor 2,3(ligt waarschijnlijk aan die +1) en meer dan 6