txtUyeNo =textbox1.text & Nz(DMax("cdbl(nz(right([Siparis_No],11),0))", "[MüsteriKayitlari]","[Siparis_No] like '" & textbox1.text "*'"), 0) + 1

gibi bir kod işinize yarayabilir. Deneyemedim teorik

---

txtUyeNo bu geçici değerin olduğu bir alandir

---

11 ifadesi alandaki son 11 basamağın sayısal olduğu varsayımına dayanır. A yada B gibi harfler çıkarıldıktan sonra geriye kalan kaç basamak sayisal veri ise 11 yerine o yazılmalı yanlış saymadıysam sizde 11 tane vardi