Text1 = Adodc1.Recordset.Fields(2).Value改为Text1 = Adodc1.Recordset.Fields(2).Value & ""其他类似的也这样改也可简化为Text1 = Adodc1.Recordset(2) & ""
