主题：新增一条记录出错

ORACLE 表

 

CREATE TABLE ORDER_CUST_INFO
(
  "_Identify"    NUMBER,                         ----------------主键，ORACLE 序列自动编码（触发器做的）
  CUST_NAME      VARCHAR2(20 BYTE),
  CONTACT_NAME   VARCHAR2(20 BYTE),
  CONTACT_PHONE  VARCHAR2(20 BYTE)
)

 

buton "NEW"  click :

 

 With Tables("ORDER_CUST_INFO")
    If .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改
        .AddNew()
        
    Else
        MessageBox.Show("该记录已经被修改,若想保存结果请先<保存修改>,否则请<撤销修改>! ")
       
    End If
   
End With

 

只要我光标跳动就出错

 

此主题相关图片如下：ttt.jpg