For i As Integer = 1 To 7 For j As Integer = 1 To 7 Dim wtb As WinForm.TextBox = e.Form.Controls("Ts_" & i & "_" & j) If wtb.Text = "" Then wtb.Visible = False
Else
wtb.Visible = True End If Next