[ Φόρμες ] Ενημέρωση φόρμας με vba

[silixridi]

Στην επισυναψη φαινεται το γιατι επιμενω στο ΝΑΙ/ΟΧΙ (τσεκαρω), απλως θελω να προσδιορισω το κοστος απο εναν πινακα (στον οποιο θα αλλαζω τις τιμες, οταν αυτες αλλάζουν).

Private Sub B1_AfterUpdate()
If B1.Value = False Then B11.Caption = ""
If B1.Value = True Then B11.Caption = [ΚΟΣΤΟΣ ΕΞΕΤΑΣΕΩΝ][ορισμενη τιμη]
End Sub

Το Β1 δέχεται Ναι/Όχι. Θα ήθελα αν το Β1 είναι Ναι τότε αντι για 5 που γράφω να παίρνει ορισμένη τιμή από πίνακα