Form1.Data1.RecordSource = tempstr
Form1.Data1.Recordset.edit
Form1.Data1.Recordset.Fields(0) = name1
 Form1.Data1.Recordset.Fields(6) = department
 Form1.Data1.Recordset.Fields(7) = class
 Form1.Data1.Recordset.Fields(4) = num
 Form1.Data1.Recordset.Fields(1) = sex
 Form1.Data1.Recordset.Fields(3) = area
 Form1.Data1.Recordset.Fields(5) = minzu
 Form1.Data1.Recordset.Fields(8) = address
 Form1.Data1.Recordset.Fields(9) = code
 Form1.Data1.Recordset.Fields(2) = bir
 Form1.Data1.Recordset.Update Form1.Data1.Refreshname1,department,class是从text中取出来的字符串,个数有你的数据库表结构决定
还有,在这之前用recordsource="select * from ……"查询语句定位到你要修改的字符串还有,你没有分啊

解决方案 »

  1.   

    daryl715(汉堡包)你最后一句话真逗
      

  2.   

    分无所谓,开个玩笑而已
    Form1.Data1.RecordSource ="select * from 表名称 where 姓名='"& namestring &"'" 
                                  (更详细地请看sql语句使用说明)
    Form1.Data1.Recordset.edit
    Form1.Data1.Recordset.Fields(0) = name1
    Form1.Data1.Recordset.Fields(6) = department
    Form1.Data1.Recordset.Fields(7) = class
    Form1.Data1.Recordset.Fields(4) = num
    Form1.Data1.Recordset.Fields(1) = sex
    Form1.Data1.Recordset.Fields(3) = area
    Form1.Data1.Recordset.Fields(5) = minzu
    Form1.Data1.Recordset.Fields(8) = address
    Form1.Data1.Recordset.Fields(9) = code
    Form1.Data1.Recordset.Fields(2) = bir
    Form1.Data1.Recordset.Update
    Form1.Data1.Refresh
    表中有一项数据是姓名为namestring的数据,并有其它字段(department,class等)
    从相应的text中读取 要修改的内容到department,class等字符串变量,然后执行
    Form1.Data1.Recordset.Fields(0) = name1
    Form1.Data1.Recordset.Fields(6) = department
    Form1.Data1.Recordset.Fields(7) = class
    Form1.Data1.Recordset.Fields(4) = num
    Form1.Data1.Recordset.Fields(1) = sex
    Form1.Data1.Recordset.Fields(3) = area
    Form1.Data1.Recordset.Fields(5) = minzu
    Form1.Data1.Recordset.Fields(8) = address
    Form1.Data1.Recordset.Fields(9) = code
    Form1.Data1.Recordset.Fields(2) = bir
    这些语句进行更新,在这前应该有edit,之后要有update和refresh