以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  新手请教表中理如何不出现空行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=38919)

--  作者:hopestarxia
--  发布时间:2013/8/10 18:48:00
--  新手请教表中理如何不出现空行
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:钢材系统.rar

新手,开始学习狐表。
建立了一个地区资料表,内容如下
地区代码  地区名称  上级地区

1            北京

2            天津

3            上海

4            重庆

 

 

 

5           河北
新增加了一个窗口添加地区资料表的内容,可是表中总是会出现空行,4至5之间空白是空白行。请问怎么处理才会没有空行。可查看附近,请帮忙指导一下。


--  作者:有点甜
--  发布时间:2013/8/10 19:39:00
--  
 楼主,在窗口的beforeclose事件加入代码可解决

Tables("地区资料").DataTable.DeleteFor("地区代码 is null and 地区名称 is null")

--  作者:hopestarxia
--  发布时间:2013/8/11 15:36:00
--  谢谢!
谢谢解答,昨天在一个实例中倒是找到了一个处理方法,不过语句没有楼主的简单,改为楼主的方法了。呵呵,谢谢!
--  作者:hopestarxia
--  发布时间:2013/8/11 15:43:00
--  
Dim Filter As String
For Each dc As DataCol In DataTables("地区资料").DataCols
    If Filter > "" Then
        Filter = Filter & " And "
    End If
    Filter = Filter & dc.Name & " Is Null"
Next
DataTables("地区资料").DeleteFor(Filter)

这是昨天找到的代码。
[此贴子已经被作者于2013-8-11 15:43:25编辑过]