I realized that I put the code in Form_BeforeUpdate, I changed to:
Private Sub MemberID_BeforeUpdate(Cancel As Integer)
If Len(Me![MemberID]) <> IIf(Me![MemberID] Like "#*", 8, 11) Then
Cancel = True
Exit Sub
End If
End Sub
But still not working, not even giving me an error message.