एक्सेस फॉर्म कंट्रोलबॉक्स में पेस्ट करने के लिए रिकॉर्ड से टेक्स्ट का उपयोग करें

अंत में यह पता लगाया गया कि एक टेक्स्टबॉक्स में एक मान (इकाइयों का योग) को कैसे "स्थान" करना है जो एक फॉर्म में मानदंड (इकाई प्रकार) के आधार पर भिन्न होता है, जहां टेक्स्टबॉक्स का नाम मेरे रिकॉर्डसेट के भीतर ही रिकॉर्ड के अंदर होता है। अगर किसी और के पास भी ऐसा ही सवाल है, तो मैंने यह कैसे किया:

Dim cntl As String
 Dim frm As String
 Dim rst_UnitEntry As Recordset
 frm = "frm_UserEntry"

Set rst_UnitEntryCounts = CurrentDb.OpenRecordset("SELECT...)     
If rst_UnitEntryCounts.RecordCount <> 0 Then
        rst_UnitEntryCounts.MoveFirst
        Do Until rst_UnitEntryCounts.EOF = True
        If rst_UnitEntryCounts![UnitTypes_CumalativeTextBoxUserEntryForm] <> "" Then
            cntl = rst_UnitEntryCounts![UnitTypes_CumalativeTextBoxUserEntryForm]
            Forms(frm).Controls(cntl) = rst_UnitEntryCounts![SumOfUnitEntry_Unit_Count]
        End If
        rst_UnitEntryCounts.MoveNext
        Loop