Dim isTrue As Boolean = True
For i As Integer = 1 To 20 If Tables("表A").Current("T" & i) = False Then isTrue = False Exit For End If Next
msgbox(isTrue)