标题：点击“增加一行”，当该行没有数据输入的时候，再点“增加一行”将不能增加，并提示请输入内容后再增加，代码如何写？

1楼

lgcfoxtable 发表于：2011/9/28 10:54:00

点击“增加一行”，当该行没有数据输入的时候，再点“增加一行”将不能增加，并提示请输入内容后再增加，代码如何写？

2楼

狐狸爸爸 发表于：2011/9/28 11:17:00

可以用这个事件的：

http://www.foxtable.com/help/topics/0629.htm

3楼

lgcfoxtable 发表于：2011/9/28 12:38:00

谢谢管理员，我想在窗体中点击实现我的想法，我不知道代码怎么编写？

4楼

mr725 发表于：2011/9/28 12:46:00

你最好写一下自己的代码，让大家帮你纠错····

5楼

lgcfoxtable 发表于：2011/9/28 15:07:00

If     不知道怎么写=空    Then
              不能增加
              Messagebox.Show("不能为空，请输入数据！","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

Tables("表名").AddNew() '增加一行

6楼

狐狸爸爸 发表于：2011/9/28 15:17:00

Dim r As Row = Tables("表名").Current
If r.isnull("列名1") orelse r.isnull("列名2") orelse r.isnull("列名3") then
Messagebox.Show("不能为空，请输入数据！","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
return
End If
Tables("表名").AddNew() '增加一行

参考：

http://www.foxtable.com/help/topics/0595.htm

7楼

lgcfoxtable 发表于：2011/9/28 15:52:00

谢谢

共7 条记录, 每页显示 10 条, 页签: [1]