יש לי שני טפסים, באחד כפתור בשני תיבת טקסט איך אני עושה כשלוחצים על הכפתור זה כותב את הcaption של הכפתור בתיבת טקסט?

ועוד שאלה קטנה:
יש לי את התוכנית הקטנה הזאת
Private Sub Check1_Click()
If Check1.Value = 1 Then
Text1.Text = Text1.Text + Check1.Caption
Combo1.Visible = True
Else
Combo1.Visible = False
Text1.Text = Text1.Text - Check1.Caption
End If
End Sub
אני רוצה לעשות שה-value של check1 שווה false זה ימחק את הcaption שלו
Text1.Text = Text1.Text - Check1.Caption
השורה הזאת לא עובדת.. מה הבעיה?