这种写法好奇怪,应该先连接数据库求SUM,再将结果赋值给变量,最后将变量赋值给TEXT1.TEXT
不知道你select上的双引号要不要
不要的话
Text1 = "Adodc1.RecordSource ='select Sum("金额") from chb'"
要的话
Text1 = "Adodc1.RecordSource ='""select Sum("金额") from chb""'"
"select SUM(要求和的字段名) as 要显示的字段名 from 表名"
"select SUM(金额) as 要显示的字段名 from chb"