private sub datagrid1_beforecolupdate(byval colindex as integer, oldvalue as variant, cancel as integer)
if 明細金額對賬 = 1 then
dim 數量回單 as variant
dim 單價修正 as variant
if colindex = 10 then
id = datagrid1.columns("序號").value
if not isnull(datagrid1.columns("回單數量").value) then
if not isnumeric(datagrid1.columns("回單數量").value) then
msgbox "對不起，回單數量是數字，請重新輸入", vbokonly, "錯誤提示"
cancel = true
exit sub
end if
end if
elseif colindex = 8 then
if not isnull(datagrid1.columns("修正單價").value) then
if not isnumeric(datagrid1.columns("修正單價").value) then
msgbox "對不起，修正單價是數字，請重新輸入", vbokonly, "錯誤提示"
cancel = true
exit sub
end if
end if
elseif colindex = 13 then
時間 = datagrid1.columns("入賬日期").value
if 時間 = 1 or 時間 = 2 or 時間 = 3 or 時間 = 4 or 時間 = 5 or 時間 = 6 or 時間 = 7 or 時間 = 8 or 時間 = 9 or 時間 = 10 or 時間 = 11 or 時間 = 12 then
if (時間 < 伺服器月 and 時間 >= 伺服器月 - 1) or (時間 = 12 and 伺服器月 = 1) then
核對日期 = 伺服器年 & "-" & 時間 & "-" & "1"
單號 = datagrid1.columns("訂單編號").value
if msgbox("確定已經完成對【" & trim(單號) & "】的對賬嗎？" & chr(13) & "此筆賬目將要進入的月份為" & 伺服器年 & "." & 時間 & "月，請確認！", vbyesno, "提示資訊") = vbyes then
1.if isnull(datagrid1.columns("回單數量").value) and not isnull(datagrid1.columns("修正單價").value) then
sql3 = "update 財務應收 set 入賬日期 ='" & 核對日期 & "',回單數量=送貨數量 where 序號 ='" & id & "'"
cn.open strcn
rs.open sql3, cn
cn.close
2.elseif not isnull(datagrid1.columns("回單數量").value) and isnull(datagrid1.columns("修正單價").value) then
sql3 = "update 財務應收 set 入賬日期 ='" & 核對日期 & "',修正單價=單價 where 序號 ='" & id & "'"
cn.open strcn
rs.open sql3, cn
cn.close
3.elseif isnull(datagrid1.columns("回單數量").value) and isnull(datagrid1.columns("修正單價").value) then
sql3 = "update 財務應收 set 入賬日期 ='" & 核對日期 & "',修正單價=單價,回單數量=送貨數量 where 序號 ='" & id & "'"
cn.open strcn
rs.open sql3, cn
cn.close
end if
msgbox "已經完成【" & trim(單號) & "】對賬，賬目進入月份為" & 伺服器年 & "." & 時間 & "月", vbokonly, "提示資訊"
cancel = true
adodc1.refresh
call 單號金額對賬初始化列寬修改限制
else
cancel = true
exit sub
end if
else
msgbox "對不起，你所填寫的對賬日期超過了對賬月份的限制！" & chr(13) & "這個月只能入上個月的賬目，無法人其他時間賬目。", vbokonly, "錯誤提示"
cancel = true
exit sub
end if
else
msgbox "1年中只有12個月！請重新輸入", vbokonly, "錯誤提示"
cancel = true
end if
end if
end if
JS錯誤型別
一 syntaxerror 語法錯誤 這種錯誤是最低階的錯誤但是最常見的錯誤，這是在開發中多個標點少個括號，常見於新手 二 referenceerror 引用錯誤 呼叫的變數或者方法未被定義便會報此錯誤 三 typeerror 型別錯誤 資料型別錯誤，最常見的是vue中父傳子時props接收引數時容...
前端錯誤型別
1 syntaxerror 語法錯誤 輸入不規範，或者變數命令等不規範。缺少符號 console.log hello uncaught syntaxerror missing after argument list 變數錯誤 uncaught syntaxerror invalid or unexp...
MTK系統錯誤型別
mastervon 發表於 2010 8 14 9 55 00系統錯誤中有兩種典型的分類，一種是cpu觸發的系統錯誤，另外一種是軟體觸發的系統錯誤。其實我覺得這兩種錯誤沒什麼區別。靠！什麼叫cpu觸發？什麼叫軟體觸發？這兩種分類有意義嗎？對我們除錯有幫助嗎？答案是一點幫助都沒有！我debug了這麼多...