Question

我在Access中创建一个表单（Test Form），它在一系列文本框（text1-text4）旁边有一系列复选框（check1-check4）。文本框将填充单个项目。将指示用户选中他们希望在报告中显示的任何项目旁边的框。该报告有一个文本框，所有选中的项目都将以逗号分隔。我的代码在Me.text11.text = y上失败了访问说该属性不可用。如果我将鼠标悬停在y = y +“，”+ i的行上，我看到我的输出（几乎）正确，我只是无法将其放入报告中的text11。

Private Sub Report_Open(Cancel As Integer)

Dim x As Integer, i, y As String
y = ""
For x = 1 To 4 
If Forms![Test Form]("Check" & x) = True Then
   i = Forms![Test Form]("Text" & x)
Else
   i = ""
End If
   y = y + ", " + i
Next x
   Me.Text11.SetFocus
   Me.Text11.Text=y

End Sub

谢谢

循环输出有问题

0 个答案: