For loop 访问用于循环的VBA

For loop 访问用于循环的VBA,for-loop,ms-access,vba,For Loop,Ms Access,Vba,我对VB编码很陌生,但我确实了解一些基础知识。我想创建一个循环,检查8个文本框内的值,并在受尊重的文本框旁边启用一个勾选框(如果不是空的话)。我不太清楚语法。我有8个名为Textbox1:Textbox8的文本框和8个名为checkbox1-8的复选框。这是我已经拥有的代码,但我只需要一些语法方面的帮助 For i = 1 To 8 If Textbox(i) = "" Then checkbox(i).enabled = false else checkbox(i).enabled

我对VB编码很陌生,但我确实了解一些基础知识。我想创建一个循环,检查8个文本框内的值,并在受尊重的文本框旁边启用一个勾选框(如果不是空的话)。我不太清楚语法。我有8个名为Textbox1:Textbox8的文本框和8个名为checkbox1-8的复选框。这是我已经拥有的代码,但我只需要一些语法方面的帮助

 For i = 1 To 8

 If Textbox(i) = "" Then
 checkbox(i).enabled = false
 else
 checkbox(i).enabled = true

 End If

 Next
比如:

 For i = 1 To 8
     Me.Controls("checkbox" & i).Enabled = (Nz(Me.Controls("Textbox" & i).Value) <> "")
 Next
创建字符串:Textbox&我使用该字符串引用表单控件集合中的项:如果Me.ControlsTextbox&i.Value=则对复选框使用相同的策略。