[VB6] If da un textbox ad un checkbox

[Pestilence]

Sto provando a far capire all'avvio della form che :

If text1.text = "Si" then checkbox.checked = True
else checkbox.checked = False
end if

a parte che mi da errore la fine dell'If e non ho capito ancora il xkè e poi non mi accetta il comando .Checked, ho provato anche con .Value = 1 ma niente.

Infine dovrei anche far capire che quando ci clicco sopra il checkbox il text deve diventare "si" se è spuntato se non lo è deve essere "no". L'unica cosa che ho fatto è stato

 Private Sub checkbox_Click()
text1.text = "Si"
End Sub

ma così risolvo poco e niente

Grazie di tutto anticipatamente a tutti

[ladyBlu]

La sintassi dell'If è errata; devi distribuire le istruzioni una per riga; e per chekkare la CheckBox devi usare la sua proprietà Value:

If Text1.Text = "Si" Then
    CheckBox.Value = 1
Else
    CheckBox.Value = 0
End If

per quanto riguarda la gestione dell'evento Click, devi controllare il valore (.Value) del CheckBox ed in base a quello scrivere Si o No nella textbox:

Private Sub checkbox_Click()
  If CheckBox.Value = 1 Then
     Text1.Text = "Si"
  Else
     Text1.Text = "No"
  End If
End Sub

[xegallo]

sei pregato di metter il linguaggio nel titolo nelle prossime discussioni

[Pestilence]

Si scusatemi!