CheckBox

[Евгений К.]

Добрый день.
У меня такая проблема, в CheckBox, если установить галку, сбоку появляется значение вычисляемой формулы, но при отжатии галки значение не уходит (т.е. при отжатии галки рядом с CheckBox продолжает висеть его значение от прошлого нажатия), и в добавок, при повторной установке галки, новое значение пишется следующим после прошлого. Проблема, наверное, где-нибудь в настройках?

Подскажите как сделать, чтобы при отжимании галки рядом с CheckBox ничего не писалось, а при установке галки писалось только одно последнее значение формулы.

Спасибо!

[doober]

В событии нажатия CheckBox1 вставте код

Private Sub CheckBox1_Click()
If CheckBox1.Value = False Then
CheckBox1.Caption = ""
Else
CheckBox1.Caption = 20 * Rnd  'Ваша формула
End If
End Sub

[Евгений К.]

Спасибо!