主题：[求助]

For i As Integer = 1 to 8
    e.Form.Controls(i).Value = Nothing
Next

或者

Dim s1() As String = {"1","2","3","4","5","6","7","8"}
For Each s As String In s1
    e.Form.Controls(s).Value = Nothing
Next