Question

VB+ACCESS数据库，文本框内容为数字，如何自动相加？

Adodc1.RecordSource = "select 姓名 from 学员信息事务部"
DataGrid1.Refresh
Adodc1.Recordset("补考费") = Trim(Text1.Text) + Adodc1.Recordset("补考费")
Adodc1.Recordset.Update
End Sub
这是我现在的代码。
TEXT1这个文本框第一次输入数字50，然后数据库中的字段"补考费"显示为50，第二次再在TEXT1这个文本框输入数字50，数据库的字段"补考费"显示为5050，我想实现的结果是第二次再文本框输入数字50后，数据库的字段"补考费"显示为100，自动跟前一次的数据相加。请问这代码要怎么写？数据库的字段"补考费"为文本属性，不是数字。

Answer 1

Adodc1.Recordset("补考费") = Trim(Text1.Text) + Adodc1.Recordset("补考费")
改成 val( Trim(Text1.Text) ) + val(Adodc1.Recordset("补考费"))