很简单的，来帮帮忙啊！

Question

Dim cmdstr As String
cmdstr = "updata member set card_id = '" & cmbChange_card.Text& "' ,
                            name = '" & TxtChange_name.Text& "',
                            identityno ='" & txtChange_id.Text & "',
                            balance ='" & txtChange_balance & "',
                            time ='" & txtChange_date"' 
                         where id ='" & cmbChange_id.Text & "'"
说where id 缺少结束语句
麻烦各位帮看看。给分的！

Answer 1

time ='" & txtChange_date"' 
改为
time ='" & txtChange_date & "' 
                          ^^

Answer 2

Dim cmdstr As String
cmdstr = "updata member set card_id = '" & cmbChange_card.Text & "' ,
                            name = '" & TxtChange_name.Text & "',
                            identityno ='" & txtChange_id.Text & "',
                            balance ='" & txtChange_balance & "',
                            [time] ='" & txtChange_date &"' 
                         where id ='" & cmbChange_id.Text & "'"