Visual Basic - Variable

que error tiene esto???
la variable interes solo tiene el valor informatica y nunca suma politica

If Check1(1).Value = 1 Then
interes = "informatica"
End If
If Check1(2).Value = 1 Then
interes = interes + ", Politica"
End If

intente tambien de este modo, osea sin el ( =1) pero no funciono

If Check1(1).Value Then
interes = "informatica"
End If
If Check1(2).Value Then
interes = interes + ", Politica"
End If

gracias espero su respuesta

Matías... la posibilidad existe en que check1(2) no esté tildado.

También para más claridad del código reemplaza el " = 1 " por la constante
" = vbChecked" (o sea... If Check1(1).Value = vbChecked)

y para concatenar strings, se recomienda la utilización del "&" en lugar de "+"

Si tienes los dos Check tildados, te recomiendo que ejecutes la aplicación paso a paso (con F8) para ver en dónde se encuentra el problema.

Saludos!