在VB中编写求数据库中一列的值

我想求的是数据库中表名为GZMX，列名为，CZS我想查询CZX一列的和，我写的代码是这样的，首先我需要把所有这个表中的数据进行查询之后显示出来，在这个基础上还怎么能定义一个TEXT1里面的值为这一列的值，谢谢大家了

Private Sub Form_Load()
Dim conn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim sql As String

'On Error GoTo ExecuteSQL_Error

conn.ConnectionString = ConnStr
conn.Open
sql = "select * from gzmx"
rst.Open sql, conn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rst
Do While rst.EOF = False

ExecuteSQL_Exit:
Set conn = Nothing
Exit Sub

End Sub
我是这样想的，不过求出来的是共几列，不是这一列的和，程序如下

Private Sub Form_Load()
Dim conn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim sql As String
Dim sum As Integer

'On Error GoTo ExecuteSQL_Error

conn.ConnectionString = ConnStr
conn.Open
sql = "select * from gzmx"
rst.Open sql, conn, adOpenKeyset, adLockOptimistic

你再加一个查询,Select sum(CZX) as 自定义列名 form GZMX
然后把这个结果赋给文本框就行了.

你用的a是每有一条记录就加1，不是求和，VB里怎么从rst中取值的方法忘了，反正你把a=a+1换成a=a+rst的值就对了

把a=a+1换成a=a+rst(列号)就对了
rst(0)代表第一列

在VB中编写求数据库中一列的值 excel 表格中怎么在一列中编写一个数的一次方到100次方？ Vb中编写的问题 在VB数据库编程中连接ACESS数据库的语句 VB编写一个求四个数中最大值的函数 在vb.net中怎么编写一个控制台程序，求两个整数的平均值 VB与数据库相连，查询某个表中一列的值后，怎么把那列的值一个一个的取出来呢？ 在VB中，编写代码的思路是怎么样的 如何编写在VB中读取TXT文件的语句？ 在VB中怎样编写程序代码?