Olá a todo forum,
Tenho um formulário onde existe um campo "HealthNumb", que limitei o utilizador a poder digitar apenas 9 números
uso este codigo
Private Sub HealthNumb_BeforeUpdate(Cancel As Integer)
If Len(HealthNumb) > 9 Then
MsgBox "Ultrapassou os 9 digitos....", vbCritical
Me.Undo
End If
End Sub
A minha questão é, sempre que o utilizador se engana e procede à correção, noto que o ID da tabela aumenta a numeração dos registos dando a ideia que existem registos eliminados
A ideia seria, sempre que o utilizador digitar mais que 9 numeros, e por se tratar do 1º campo no formulário, não deixaria avançar sem corrigir, mas também não incrementava nenhum registo no ID automático da tabela
Atenciosamente
Jose Silva
Tenho um formulário onde existe um campo "HealthNumb", que limitei o utilizador a poder digitar apenas 9 números
uso este codigo
Private Sub HealthNumb_BeforeUpdate(Cancel As Integer)
If Len(HealthNumb) > 9 Then
MsgBox "Ultrapassou os 9 digitos....", vbCritical
Me.Undo
End If
End Sub
A minha questão é, sempre que o utilizador se engana e procede à correção, noto que o ID da tabela aumenta a numeração dos registos dando a ideia que existem registos eliminados
A ideia seria, sempre que o utilizador digitar mais que 9 numeros, e por se tratar do 1º campo no formulário, não deixaria avançar sem corrigir, mas também não incrementava nenhum registo no ID automático da tabela
Atenciosamente
Jose Silva