error de compilacion

david_nas
21 de Octubre del 2009
e creado un programa para cambiar el color del texto/fondo y me da el siguiente error:
Error de compilacion:
Se esperaba: fin de instruccion

Private Sub optColor_Click(Index As Integer)
If Index = 0 Then ’Se pasa a cambiar el fondo
Frojo = hsbColor(0).Value
Fverde = hsbColor(1).Value
Fazul = hsbColor(2).Value
hsbColor(0).Value = Brojo
hsbColor(1).Value = Bverde
hsbColor(2).Value = Bazul
Else: ’Se pasa a cambiar texto
Brojo = hsbColor(0).Value
Bverde = hsbColor(1).Value
Bazul = hsbColor(2).Value
hsbColor(0).Value = Frojo
hsbColor(1).Value = Fverde
hsbColor(2).Value = Fazul
End If
End Sub

se me pone en rojo la parte de "se pasas a cambiar texto" y "se pasa a cambiar fondo"
por que es? gracias de antemano soy nueevo en esto del Basic