انتقال یک کلمه از یک تکست باکس به تکست باکس دیگری [بایگانی]

xrezax

شنبه 21 شهریور 1388, 09:27 صبح

دوستان من یک text دارم که توش چندتا خط نوشته شده مثلاً اینجوری

12111222233336554447888554897745
12111222233336554447888554897745
12111222233336554447888554897745
12111222233336554447888554897745
12111222233336554447888554897745

حالا می خوای یک text دیگه بزارم که مثلاً اگه توش نوشتم 0 (صفر) بره توی تکست بگرده و هرچی 9 هستو پاک کنه و 0 (صفر) جایگزین کنه.

xxxxx_xxxxx

شنبه 21 شهریور 1388, 09:51 صبح

دستور کلی این هست:

Text1.Text = Replace(Text1.Text, "9", "0")

بر حسب مقادیر دلخواه تغییرش بدید