Hola amigos tengo un problemita resulta que quiero generar codigo automatico y estoy trabajando con MYSQL 5.0 Y Vb.net 2008
resulta que lo pense hacer de esta manera capturar la utima posicion de lo que contiene el grid y luego extraer laparte numerica y sumarlo mas uno y luego volverlo a poner pero re sulta por ejemplo de tengo este codigo "Esp-0001" cuando hace la extracion desde la posicion 5 hasta el 8 al sumarlo solo me devuelve supongamos Esp-0001 me devuelve solo 2 sin los ceros entonces indagando me encontre que se podia rellenar con ceros ala izquierda o a la derecha entonces le aplique y me funciona perfecto pero prove cuando ya llega a supongamos a Esp-0012 el PadLeft me sigue agregando esa cantidad y me queda asi Esp-00012 lo cual me genera error ya que en mi base de datos tengo slo el campo codigo CHAR(8) me podrian dar alguna idea como hacerlo
Estes el codigo fuente en cuestion:
For numero As Integer = 1 To grvinstrumento.RowCount - 1
codigo = Me.grvinstrumento.Rows(numero).Cells("codigo").Value
Next
cod = Vb.Mid(codigo, 5, 8)
instru = Val(cod) + 1
Dim s, AT As String
s = frm_man_cona.txtcod.Text.Trim.PadLeft(3, "0")
AT = "Esp-" + s
frm_man_insta.txtcod.Text = AT + Str(instru).Trim
