我想让我表中的数据 跟我的text对应  我是这么写的  你们看哪里有错?? 这个update语法我不太了解 请指点一下    Dim ID As String
    Dim Name As String
    Dim sex As String
    Dim Email As String
    Dim bz As String
    Dim Phone As String
    Dim bNo As String
    Dim sdate1 As String
    Dim zt1 As String
    
    '让变量字符串=text
    ID = idt.Text
    Name = namet.Text
    sex = sexc.Text
    Email = emailt.Text
    Phone = phonet.Text
    bNo = bnot.Text
    sdate1 = Format(DTPicker1.value, "yyyy-mm-dd")
    bz = bzt.Text
    zt1 = zt.Text
    
    
    On Error GoTo err
    Dim sqlstr As String
    sqlstr = "update 用户表 set('" & ID & "','" & Name & "','" & sex & "','" & Email & "','" & Phone & "','" & bNo & "','" & sdate1 & "','" & bz & "','" & zt1 & "') where('" & ID & "','" & Name & "','" & sex & "','" & Email & "','" & Phone & "','" & bNo & "','" & sdate1 & "','" & bz & "','" & zt1 & "')"
    Conn.Execute sqlstr
    MsgBox "更新成功", vbExclamation, "提示"
    plus.Enabled = True
    
    
    Search_Go borrower.fg, "用户表", "ID", ""
    
    
    Exit Sub
    
err:
    MsgBox "错误:" & err.Description, vbExclamation, "提示"
End Sub