......
上面ADO与DataGrid都捆绑好了的!
ADO1.Recordset.movfirst
Do While Not ADO1.Recordset.EOF
'******************
If ADO1.Recordset![ID] = T0ID Then
ADO1.Recordset![数量] = (ADO1.Recordset![数量] -
Val(T0count.Text))
End If
ADO1.Recordset.MoveNext
Loop
..........
上面的ADO1.Recordset![数量] = (ADO1.Recordset![数量] -
Val(T0count.Text))这句在程序运行后表中的"数量"字段中的记录没有变,
不知道是怎么回事!谢谢各位大虾的帮忙,我的QQ:191924696
上面ADO与DataGrid都捆绑好了的!
ADO1.Recordset.movfirst
Do While Not ADO1.Recordset.EOF
'******************
If ADO1.Recordset![ID] = T0ID Then
ADO1.Recordset![数量] = (ADO1.Recordset![数量] -
Val(T0count.Text))
End If
ADO1.Recordset.MoveNext
Loop
..........
上面的ADO1.Recordset![数量] = (ADO1.Recordset![数量] -
Val(T0count.Text))这句在程序运行后表中的"数量"字段中的记录没有变,
不知道是怎么回事!谢谢各位大虾的帮忙,我的QQ:191924696
这句中的T0ID是什么如果为常量则:
If ADO1.Recordset![ID] = "T0ID" Then如果是变量则:
If ADO1.Recordset![ID] = "& T0ID &" Then
If ADO1.Recordset![ID] = '"& T0ID &"' Then
因为我在ADO1.Recordset![数量] = (ADO1.Recordset![数量] -
Val(T0count.Text))
后面加了一句 msgbox "list"都有响应,就是ADO1.Recordset![数量]的值不发生变化?
请多多指点??????请多多指点??????请多多指点??????请多多指点??????
请多多指点??????请多多指点??????请多多指点??????请多多指点??????
ADO1.Recordset![数量] = (ADO1.Recordset![数量] - Val(T0count.Text))
End If原因可能那个时候 ADO1.Recordset![数量] 或 T0count.Text 的值是NULL有了NULL,程序的很多的地方有会出现“混沌”状态
T0count.text的值我把它都默认设为1了的,不可能出现NULL。
遇到怪事儿了,求救??????????????????????
ADO1.Recordset![数量] = (ADO1.Recordset![数量] - Val(T0count.Text))
Debug.Print "Reached"
End If那现在的解释是
T0count.Text转换为数值的时候为零T0count.text的值你把它都默认设为1,会不会是小写的"L"啊?Val("L") = 0
后面加了一句Debug.print ADO1.Recordset![数量]
显示为正确的值(只是当时显示有效);
但在库里面值依然没有变。我在表中"数量"的字段是设的"数字"型!
求救呀!!!!!!!!!!!!???????????????????????