各位老师请帮助看看关于多条件更新，VBA如何写？谢谢

yanwei82123300

各位老师请帮助看看关于多条件更新，VBA如何写？：
一个例子：关于会员信息变更的问题：
1：会员号变更，原会员号下的信息不变，只修改会员号
If IsNull(Me!变更后会员号) = True Then
  MsgBox "会员号没有被修改"
' Exit Sub
Else
SQLTEXT = "UPDATE [tbl会员表] SET [tbl会员表].[会员号] = Forms![frm会员信息变更]!变更后会员号 WHERE [会员号]= '" & Forms![frm会员信息变更]!会员号 & "'"
DoCmd.RunSQL SQLTEXT
2：会员号不变，会员号下面的其他字段变更，例如，姓名变更
If IsNull(Me!变更后姓名) = True Then
  MsgBox "姓名没有被修改"
' Exit Sub
Else
SQLTEXT = "UPDATE [tbl会员表] SET [tbl会员表].[姓名] = Forms![frm会员信息变更]!变更后姓名 WHERE [会员号]= '" & Forms![frm会员信息变更]!会员号 & "'"
DoCmd.RunSQL SQLTEXT
SQLTEXT = "UPDATE [tbl会员表] SET [tbl会员表].[曾用名] = Forms![frm会员信息变更]!姓名 WHERE [会员号]= '" & Forms![frm会员信息变更]!会员号 & "'"
DoCmd.RunSQL SQLTEXT
MsgBox "姓名被修改"

3: 会员号变更，同时原会员下面的信息同时变更，请问咋写呢？谢谢
请问上面的语句可以写个循环吗？如何写请帮助看看，感谢

yanwei82123300

我把例子上传，请帮助看看，谢谢

yanwei82123300

roych 发表于 2018-12-13 12:15
如果有很多这样的变更。个人建议创建一个宽表，把变更记录录入到宽表里，再直接追加到信息表里。这样也方便 ...

谢谢roych老师提供的思路和方法。我试试