AYUDA CON UN REGISTRO DE CLIENTES

[carnage_2010]

HOLA AMIGOS¡¡¡¡¡

ESTOY HACIENDO UN SISTEMA DE REGISTRO DE CLIENTES, CON UN CODIGO DE CLIENTE, NOMBRE, APELLIDO ETC. EL PROBLEMA ES QUE CUANDO AGREGO UN NUEVO CLIENTE NO LLEVA UNA CONTINUIDAD EN EL CODIGO, ES DECIR SI TENGO CINCO CAMPOS Y QUIERO AGREGAR EL SEXTO, PERO LE PONGO CUALQUIER NUMERO ME LO ACEPTA Y LO GUARDA, LO QUE QUIERO ES QUE NO ME GUARDE UN REGISTRO SI ME ESTOY SALTANDO UN NUMERO, POR EJEMPLO 1, 2,3,4,5,6,7 Y ASI SUCESIVAMENTE
Y SI QUIERO AGREGAR EL REGISTRO 8 QUE NO ME DEJE HASTA QUE AGREGUE EL 7.
ESTO ES TODO LO QUE LLEVO DE CODIGO OJALA Y ME PUEDAN AYUDAR GRACIAS POR SU ATENCION...........


If Char.IsDigit(e.KeyChar) Then
e.Handled = False
ElseIf Char.IsControl(e.KeyChar) Then
e.Handled = False
Else
e.Handled = True

CODIGO_CLIENTETextBox.Text = 5
CODIGO_CLIENTETextBox.Text = Val(CODIGO_CLIENTETextBox.Text) + 1

GRACIAS.....SALUDOS.