以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  报告自动排版Bug  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57608)

--  作者:蓝色理想
--  发布时间:2014/9/27 18:21:00
--  报告自动排版Bug
下列代码,无法自动排版,请看看原因

           If  not e.DataRow.IsNull("预付比例") Then
              If( (e.DataRow("预付比例")+e.DataRow("本月付款比例")) > 1) Then
                MessageBox.Show( "《" & e.DataTable.Name & "》" & "警告:<预付比例>+<本月付款比例> 大于 100% !  存盘失败!")
                e.Cancel = True
            End If
            Index =    Tables(e.DataTable.Name).FindRow(e.DataRow) \'找出此行在销售数据Table中的位置
            If Index > -1 Then \'如果找到此行
                Tables(e.DataTable.Name).Position = Index \'将焦点定位到此行
            End If
            MainTable = Tables(e.DataTable.Name) \'选择销售数据表作为主表.
        End If
    End If


--  作者:蓝色理想
--  发布时间:2014/9/27 18:22:00
--  
自动排版格式错误

最后多了一个end if 我知道