使用字符串作为属性名称

Question

我正在尝试将值设置为文本框，方法是将它们称为字符串

文本框名称均遵循以下格式： 例如。 txt_N1或txt_N2

我希望能够通过增加文本框名称的整数来查看文本框，这看起来像"txt_N" & CStr(intRow)。

我不确定我是怎么做的。 以下是我到目前为止所做的事情

intRow = 1  'The 1st Row 
recVat.MoveFirst 'Go to the 1st record in the recordset

'Loop through the records
Do Until intRow = 4 Or recVat.EOF             

    'Set the text boxes in the VAT Summary
    strNet = "txt_N" & CStr(intRow)

    Me!strNet = recVat![SumOfnet_t]       


    'Move to the Next Record
    recVat.MoveNext
    intRow = intRow + 1

Loop

Answer 1

不要使用爆炸符号，而是使用常规符号，这应该很容易：

  Me.Controls(strNet).Value = recVat![SumOfnet_t]