str = dgemp_monthlyshare.Item(3, i).Value 'value to fetch from datagrid
db = CInt(Val(str))
Double.TryParse(str, dub)
qr = "insert into tbshare_purchase(share_purchase) values('" + dub + "')"' here generates error
需要检查查询语句,因为即使在字符串转换为双精度后也会产生错误。我在 vb.net 2005 中使用 access2000