Увеличивать флажки в непрерывной форме

Question

Я пытаюсь увеличить размер флажков с помощью крыльев с помощью этого метода.

Private Sub Form_Current() 
If Me.chkVerify = True Then 
lblLargeCheck.Caption = Chr(252) 
Else 
lblLargeCheck.Caption = " " ' a space 
End If 
End Sub 

Private Sub lblLargeCheck_Click() 
[chkVerify] = Not ([chkVerify]) 
If [chkVerify] = True Then 
lblLargeCheck.Caption = Chr(252) 
Else 
lblLargeCheck.Caption = " " ' a space 
End If 
End Sub 

Здесь ошибка, что я бегу в:

Обратите внимание на первый флажок отмечен и флажок этикетка все проверено. Есть ли проблема с этой проблемой? Мне нужен только большой флажок для определенной строки, только если отмечен флажок. Я буду скрывать флажок в конце.

Answer 1

Вам необходимо привязать большой флажок к значению chkVerify в каждой строке вашей непрерывной формы. Вы не можете сделать это с помощью ярлыка. Но вы можете сделать это с помощью текстового поля, если вы даете ему этот Control Source ...

=IIf([chkVerify],Chr(252),Null) 

Тогда для txtLargeCheck_Click(), вам нужно всего лишь переключить chkVerify ... и что, в свою очередь обновляет то, что отображается в txtLargeCheck ...

Private Sub txtLargeCheck_Click() 
    Me!chkVerify.Value = Not Me!chkVerify.Value 
End Sub 

Вот скриншот моего образец формы в действии ...