Question

VB把ACCESS一字段求和并在TEXT2中显示..

Dim rst As New adodb.Recordset
Dim sqlstring As String

sqlstring = "select sum(01) as Sum from 表1 "

rst.Open sqlstring, Conn, 1, 3

Text2.Text = rst.Sum
End Sub
如上.反色显示srt.sum.并提示未找到方法或数据成员..TKS..
Adodc2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\VB\数据库\db1.mdb"
Adodc2.RecordSource = "select sum(一) as 和 from 表1 " 'SUM()中如果是阿拉伯数字,会出错
Adodc2.Refresh
Text2(0) = Adodc2.Recordset.Fields("和")

用上面这语句可以了..如果select sum(1) 字段名称是阿拉伯数字..则会出错

Answer 1

Dim rst As New adodb.Recordset
Dim sqlstring As String
sqlstring = "select sum([01]) from 表1" '注意这行
rst.Open sqlstring, Conn, 1, 3
Text2.Text = rst(0) '以及这行
End Sub

一般不建议用数字作为字段名，实在要用，使用时要加方括号[]

追问

因为要从字段名1到50.所以想用数字,用FOR NEXT来循环.个字段都要求和并取回VB......TKS...感谢...确实加上括号就好了

追答

由于字段名在SQL字串中是可以直接参与加减乘除等运算的，比如：
假定有一个字段名叫a的，另一个字段名是叫1的，那么
select a+1 as a1 ...
这时候电脑就会犯糊涂了：究竟是让字段a加上数字1呢？还是让字段a加上字段1？
如果是这样：
select a+[1] as a1 ...
这样的话电脑就明白了：是让两个字段相加！
因此，加上方括号的意思，就是为了告诉电脑这是个字段名！
同样道理，SQL的保留字（就是SQL的本身的命令名、函数名等）一般也是不建议用作字段名的，因为这会让电脑混淆，比如select就是，如果这样：
select select from 表1 ...
这样是不行的，必须改为：
select [select] from 表1 ...
明白了没有？其实所有字段名都是可以加上方括号的，但是在不会引起电脑混淆的前提下方括号是可以省略的！

Answer 2

我 来 完成

追问

帮忙看下..上面字段名字用阿拉伯数字为什么会出错..TKS...

追答

丘 上 说 吧