以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127919) |
||||
-- 作者:susanhe -- 发布时间:2018/11/25 8:02:00 -- [求助] 请问一下,我在表单的beforeAdddateRow中已经增加了以下代码,可为什么还会出现空白 ?能只允许表中有一条空白记录吗?不可再增加多个空白行,谢谢。
If e.DataTable.Find("part is null") IsNot Nothing Then \'存在第一列为空的行 此主题相关图片如下:捕获.png |
||||
-- 作者:y2287958 -- 发布时间:2018/11/25 9:34:00 -- 代码没有问题,具体问题具体分析 |
||||
-- 作者:susanhe -- 发布时间:2018/11/25 10:41:00 -- 请问可不可这们来做,当我打开窗体时,如果表的最后一条记录part 是空行,就停在这儿,如果Part不是空行,就新增一行。请帮忙一下。 |
||||
-- 作者:y2287958 -- 发布时间:2018/11/25 13:30:00 -- 当然可以,上例子吧,想法有时跟现实总是有差距的 |
||||
-- 作者:susanhe -- 发布时间:2018/11/25 14:02:00 -- 窗口2,谢谢。
|
||||
-- 作者:y2287958 -- 发布时间:2018/11/25 14:09:00 -- “part 是空行”是什么意思? |
||||
-- 作者:susanhe -- 发布时间:2018/11/25 14:22:00 -- 不好意思,就是表B中的第一列。 |
||||
-- 作者:y2287958 -- 发布时间:2018/11/25 14:40:00 -- \'Dim t As Table = Tables("窗口2_Table1") Dim t As Table = Tables("表B") Dim r As Row = t.Rows(t.Rows.Count - 1) If r Is Nothing t.AddNew Else If r.Isnull("第一列") = False t.AddNew Else t.Position = t.Rows.Count - 1 End If End If
|