Compile errors [resolved]

[Mark103]

Hi guys

I have a problem with the string, here is the code:

Sub ReadLanguages()
Dim Language, caption As String
Language = ReadIniFile(App.Path & "\LNG.ini", "Language", "Language", "")
Form1.caption = ReadIniFile(App.Path & "\LNG.ini", "Language", "Title", "")

If Language = "English" Then
   Form1.LANG_English.Checked = True
   Form1.LANG_French.Checked = False
Dim ctl1 As Control


If TypeOf ctl1 Is Menu Then _
ctl1.caption = ReadIniFile(App.Path & "\EN.ini", "ControlsLanguage", ctl1.Name, "")

Next ctl1
End If


If Language = "French" Then
   Form1.LANG_English.Checked = False
   Form1.LANG_French.Checked = True


If TypeOf ct2 Is Menu Then _
ct2.caption = ReadIniFile(App.Path & "\FR.ini", "ControlsLanguage", ct2.Name, "")

Next ctl2
End If

End Sub

I have received the error instruction "Compile error: Next without For". The error instruction tells me the problem with the two following codes "Next ctl1" and "Next ctl2". I have tried everything I can do my best but no luck to refix. What can I do in order to refix??



Thanks,
Mark