ifres = vbYes then '错误1 adodccustomer.Recordset.Delete adodccustomer.Recordset.MoveNextifadodccustomer.Recordset.eof = ture then ‘错误2 adodccustomer.Recordset.MoveLastEnd IfEnd If
Else和ElseIf即可
If addressTo.Address Then
MessageBox.Show("aaa")
ElseIf addressTo.Address Then
Else
End If
不用客气, 大家互相帮助, 在其他方面我可能还需要你的帮忙.