textboxdaki değerin bir kısmını arttırmak

[udentr2002]

Merhaba Arkadaşalr,

Konu başlığı pek açıklayıcı olmadı. Örnekle açıklamam gerekirse

bir butona tıkaldığımda textbox a" N-18-01-0001" şeklinde bir değer geliyor. Bu değeri ben başka bir textboxa "N-18-02-0001" şeklinde yazmasını istiyorum. Bunun için nasıl bir kod yazabilirim? Şimdiden ilgilenen tüm arkadaşalrıma teşekkür ederim.

 

[Ömer]

Merhaba,

TextBox2.Text = "N-18-" & Format(Mid(TextBox1.Text, 6, 2) + 1, "00") & "-0001"

Bu şekilde yazabilirsiniz.

.

 

[udentr2002]

Hocam teşekkürler