vb 怎么对数据库一列数据进行运算

要保存数据到数据库，VB自带的功能是无法完成的，除非你用普通的文件保存数据。

用ADO相对简单，对于你的问题只要一个Connection对象。用它连接数据库，用它的Execute方法来执行更新数据的SQL语句。

如果你的输入跟数据库字段直接对应，也可以使用数据绑定的办法，用ADODC控件获取数据，并将文本框跟ADODC绑定。

不知道你现在显示在界面上的数据是"查询"的结果还是整个数据库的记录?

要显示"单价"的合计,用 SQL语句就可以了.如:

假定数据表名:商品信息,字段名:单价

Dim rs As ADO.Recordset

Dim mySQL As String

'如果没有查询条件

mySQL="Select Sum(单价) From 商品信息"

'如果有查询条件

mySQL="Select Sum(单价) From 商品信息 WHERE ("+查询条件+")"

'adoConn 是数据库的连接

rs.Open mySQL,adoConn,adOpenDynamic, adLockOptimistic

'要显示的文本框为 Text1

Text1=rs(0)

这个有两种方法：

1：直接从Rst里读取数据，在Rst获得数据集合的时候

List1.Clear

rst.MoveFirst

Do While Not rst.EOF

List1.AddItem rst.Fields("text1") '这里把字段名修改成数据表里的实际字段名

rst.MoveNext

Loop

2：通过MSHFlexGrid1网格控件，向list添加数据

略

---