1. 首页
  2. 数据库
  3. Access
  4. datagrid进行某列计算并在文体框显示的方法

datagrid进行某列计算并在文体框显示的方法

上传者: 2019-07-17 12:30:44上传 TXT文件 366B 热度 22次
rivateSubCommand1_Click()DimsumAsDouble'sum就是所有的和sum=0'先给赋值为0Adodc1.Recordset.MoveFirstDoWhileNotAdodc1.Recordset.EOF'从开始一直到结尾,累加sum=sum+Adodc1.Recordset.Fields("材料成本")Adodc1.Recordset.MoveNextLoopText1.Text=Str(sum)'保存到text1中去Adodc1.Records
用户评论