[vb6] check box codice non funzionante

[Gugu]

vb è un po' generico come indicazione del linguaggio a cui fai riferimento..

se è vb6:

Private Sub Check1_Click()
If Check1.Value = 1 Then
    Check1.Caption = "Selezionato"
Else
    Check1.Caption = "Non selezionato"
End If
End Sub

Funziona benissimo.