以文本方式查看主题

-  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=144858)

--  作者:江南小镇
--  发布时间:2019/12/31 22:57:00
--  [讨论]空表
老师,下面代码在空表的姿态下增加行时报错。

With Tables("人事档案_人事档案Table1")
    If .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改
        .AddNew()
        .current("应聘信息_工号") = "GH" & .Current("_Identify")
        .current("应聘信息_入职状态") = "试用"
    Else
        MessageBox.Show("该记录已经被修改,若想保存结果请先<保存修改>,否则请<撤销修改>! ")
    End If    
End With

--  作者:有点蓝
--  发布时间:2019/12/31 23:12:00
--  
if Tables("人事档案_人事档案Table1").current is nothing then return \'凡是使用到current的地方都需要先判断是否为空值再使用,把这个原则抄下来贴到床头,每天看一看
--  作者:江南小镇
--  发布时间:2020/1/2 12:43:00
--  
老师,下面是保存修改按钮,我希望空表也能保存。

With Tables("人事档案_人事档案Table1")
Tables("人事档案_人事档案Table1").Current.Save()
e.sender.enabled = False 
End With

--  作者:有点蓝
--  发布时间:2020/1/2 13:41:00
--  
Tables("人事档案_人事档案Table1").Save()