主题：内部表使用SQL语句出错提示没有输出表，求解

  For Each cl As col In Tables("商品信息汇总").cols

    For Each c As WinForm.Control In e.Form.Controls

        If Typeof c Is WinForm.TextBox Then '判断控件是否是文本框

            Dim t As WinForm.TextBox = c '使用特定类型的变量引用控件

            If cl.Name = t.Name And t.Value IsNot Nothing Then

                Dim r As Row = Tables("商品信息汇总").AddNew

                r(cl.Name) = t.Value

            End If

        End If

    Next

Next

放在新增按钮中.