主题：为什么会出来空行呢

Dim KH As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim DDH As WinForm.TextBox  = e.Form.Controls("TextBox2")
For j As Integer = 1 To 5
    For i As Integer = 1 To 1
        Dim dr As String = e.Form.Controls("TBMX_" & i & "_" & j).text
        Dim dr2 As String = e.Form.Controls("TBY_"  & j).text
        Dim dr3 As String = e.Form.Controls("TBX_" & i).text
        If dr <> "" And dr2 <> "" And dr3<> ""  Then

Dim r As Row = Tables("表A").AddNew
            r("客户") = KH.Value
            r("订单号") = DDH.Value
            r("原料") = e.Form.Controls("TBX_" & i).Value
            r("规格") = e.Form.Controls("TBY_"  & j).Value
            r("数量") = e.Form.Controls("TBMX_" & i & "_" & j).Value
        End If
    Next
Next