報錯陳述句在第7行，但資料庫里有這些欄位，不清楚怎么改？求高人解答
1 sql_gh_month = "select * from T_gonghaocunchu_month where 日期='" & m_now & "' "
2 Set mrc_month_gh = ExecuteSQL(sql_gh_month)
3 str1 = ""
4 For j = 0 To p_count_formula - 1
5 str1 = str1 & "update T_gonghaocunchu_month set "
6 mrc_month_gh.Fields("數量").value = mrc_month_gh.Fields("數量").value + formula_table(j).value
7 str1 = str1 & "數量=" & mrc_month_gh.Fields("數量").value
8 str1 = str1 & " where 日期='" & m_now & "' and 工序='" & formula_table(j).LevelCode & "'" & vbCrLf
9 mrc_month_gh.MoveNext
10 Next j
11 Set mrc_month_gh = ExecuteSQL(str1)
12 Set mrc_month_gh = Nothing
uj5u.com熱心網友回復：
加斷點，看看mrc_month_gh是否有記錄，如果是在回圈前面沒問題，回圈到一定時候報錯，也是加斷點看看資料是否正常，還有，加個判斷，是否到了資料的末尾eofuj5u.com熱心網友回復：
mrc_month_gh有記錄，而且在每個月月初的時候都都會添加記錄，然后更新數值，這個錯誤只是在回圈到某一時刻的時候出現，這個回圈有時候報錯有時候不報錯，很難捕捉到，不是很理解您說的資料例外是什么情況？uj5u.com熱心網友回復：
出錯的時候加斷點查看一下資料，如果是跑到中間出錯，很大可能是你的select結果里面某行的有null欄位之類的。
uj5u.com熱心網友回復：
Transact-SQL 參考
ISNULL
使用指定的替換值替換 NULL。
語法
ISNULL ( check_expression , replacement_value )
引數
check_expression
將被檢查是否為 NULL的運算式。check_expression 可以是任何型別的。
replacement_value
在 check_expression 為 NULL時將回傳的運算式。replacement_value 必須與 check_expresssion 具有相同的型別。
回傳型別
回傳與 check_expression 相同的型別。
注釋
如果 check_expression 不為 NULL，那么回傳該運算式的值；否則回傳 replacement_value。
示例
A. 將 ISNULL 與 AVG 一起使用
下面的示例查找所有書的平均價格，用值 $10.00 替換 titles 表的 price 列中的所有 NULL 條目。
USE pubs
GO
SELECT AVG(ISNULL(price, $10.00))
FROM titles
GO
下面是結果集：
--------------------------
14.24
(1 row(s) affected)
B. 使用 ISNULL
下面的示例為 titles 表中的所有書選擇書名、型別及價格。如果一個書名的價格是 NULL，那么在結果集中顯示的價格為 0.00。
USE pubs
GO
SELECT SUBSTRING(title, 1, 15) AS Title, type AS Type,
ISNULL(price, 0.00) AS Price
FROM titles
GO
下面是結果集：
Title Type Price
--------------- ------------ --------------------------
The Busy Execut business 19.99
Cooking with Co business 11.95
You Can Combat business 2.99
Straight Talk A business 19.99
Silicon Valley mod_cook 19.99
The Gourmet Mic mod_cook 2.99
The Psychology UNDECIDED 0.00
But Is It User popular_comp 22.95
Secrets of Sili popular_comp 20.00
Net Etiquette popular_comp 0.00
Computer Phobic psychology 21.59
Is Anger the En psychology 10.95
Life Without Fe psychology 7.00
Prolonged Data psychology 19.99
Emotional Secur psychology 7.99
Onions, Leeks, trad_cook 20.95
Fifty Years in trad_cook 11.95
Sushi, Anyone? trad_cook 14.99
(18 row(s) affected)
請參見
運算式
IS [NOT] NULL
系統函式
WHERE
?1988-2000 Microsoft Corporation。保留所有權利。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/55818.html
標籤：VB基礎類