求助：VB6中实现MS Access查询将正值转换为负值

你的UPDATE语句有两个核心问题导致无法实现正值转负值：

• SQL语法错误：TipoPago字段赋值后缺少逗号，导致后续字段的更新逻辑无法被正确解析
• 数值类型处理错误：Cantidad是数值字段，但你用单引号把计算结果包裹成了字符串，Access无法识别为数值运算

修正后的VB6代码：

Qry = "UPDATE QuickCash SET Pagado = 'S', TipoPago = '" & PymntType & "', Cantidad = " & (Abs(Cantidad) * -1) & " WHERE Folio = '" & grdDataGrid.Columns(0).Text & "'"

关键修正点：

1. 在TipoPago = '" & PymntType & "'后面添加逗号，确保多个字段的更新逻辑符合SQL语法规范
2. 移除Cantidad计算结果外的单引号，让Access直接执行数值运算
3. 额外确认：Cantidad字段需设置为数值类型（如Number），如果是文本类型则需先做类型转换，但金额类字段建议优先使用数值类型

内容的提问来源于stack exchange，提问作者Gilberto Chazaro