數據庫中如何實現網格部件判斷字段不能為空

這篇文章給大家分享的是有關數據庫中如何實現網格部件判斷字段不能為空的內容。小編覺得挺實用的，因此分享給大家做個參考，一起跟隨小編過來看看吧。

在最近的開發中，發現上一次發的網格部件判斷字段不能為空的代碼，還存在不足：
如果在保存前將網格中某條數據用下面代碼刪除：

if showquestion("確定要刪除焦點行嗎？") then
        采購計劃打分詳細.DeleteFocusedRow()
end if

那么在執行上一貼中代碼時，就會報錯。


改進示例：

'提交單元和數據到行
采購計劃打分詳細.PostEditor()
'提交行數據到DataTable
采購計劃打分詳細.GridView.UpdateCurrentRow()
'批量添加打分ID
采購計劃打分詳細.SetColumnValue("打分ID",記錄部件1.GetFieldValue("ID"),1)
       
'BeginTrans()
'這兒操作數據庫。
記錄部件1.SaveData()
采購計劃打分詳細.SaveData()
'判斷事務執行結果
if CommitTrans()=false then
    showerror(GetTransMessage())
end if   

dim A = 0
dim dt=采購計劃打分詳細.DataTable
'保存前詢問“這些年度采購計劃是否已經在會上討論過？”
if ShowQuestion("這些年度采購計劃是否已經在會上討論過？") then
    for each dr in dt.Rows
      if isnull(dr["總分"]) or  isnull(dr["審批情況"]) then
        A = 1
        exit for
      end if
    next
else
    for each dr in dt.Rows
      if isnull(dr["總分"]) then
        A = 2
        exit for
      end if
    next
end if

if A = 1 then
    ShowInformation("請將【審批情況】、【總分】填寫完整")
    
    dim b=采購計劃打分詳細.AddColumnStyleByExpression("審批情況","[審批情況] is null",True)
    b.Appearance.ForeColor=Color.FromArgb(-65536)
    dim c=采購計劃打分詳細.AddColumnStyleByExpression("總分","[總分] is null",True)
    c.Appearance.ForeColor=Color.FromArgb(-65536)
else if A = 2 then
    ShowInformation("請將【總分】填寫完整")
    
    dim d=采購計劃打分詳細.AddColumnStyleByExpression("總分","[總分] is null",True)
    d.Appearance.ForeColor=Color.FromArgb(-65536)
    
else 
    me.Output1 = "Y"
    ShowInformation("保存成功")
    me.Close()
end if

感謝各位的閱讀！關于“數據庫中如何實現網格部件判斷字段不能為空”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，讓大家可以學到更多知識，如果覺得文章不錯，可以把它分享出去讓更多的人看到吧！