Número de Factura Automatico

[tranquilo_8925]

Hola diegocres sería posible que pongas un ejemplo por favor. Con el siguiente código genero el número de factura automático

Código:

Dim comm As New SqlCommand("Select count(idFact) from Factura", CON)
Dim nFact As Integer
nFact = comm.ExecuteScalar
nFact = nFact + 1
LblFact.Text = LblSer.Text & Format(nFact, "000000")

' CON ES LA CONEXION

******
ESTA CODIFICACIÓN GENERA EL CÓDIGO 001-000001, 001-000002 ...