کار با متن

[alirezaghdc 4]

سلام

یه سوال داشتم

میخوام کاربر یه متنی رو وارد ادیت تکست بکنه بعد بشه رو حروف اون کار کرد

مثلا کاربر بنویسه

Salam

بعد برنامه بتونه بگه سومین حرف وارد شده چیه

یا بهتر بگم

کاربر تو ادیت تکست مینویسه

hi my name is ali

من تو کد نویسی برنامه بتونم به حرف 10 ام یعنی e دسترسی داشته باشم و یا هر حرف دیگه تو متن وارد شده توسط کاربر

ممنون

[softir 459]

در هم اکنون، alirezaghdc گفته است :

ممنون بابت پاسختون

ببینید منظور من اینه

a="hi my name is alireza"

حالا این متن رو به صورت کاراکتر به کاراکتر وارد آرایه کنیم مثلا

b(1)="h"

b(2)="i"

و الی آخر

بفرما اینم کدش .

	EditText1.Text = EditText1.Text.Trim					' فاصله های خالی اول و آخر رو پاک می کنیم
	Dim ar(EditText1.Text.Length) As String					' یه ارایه می سازی که تعدادش به اندازه حروف داخل تکست باکس هست 

	For i = 0 To EditText1.Text.Length - 1					' حلقه
		ar(i) = EditText1.Text.CharAt(i)					' هر بار یک حرف از متن شما رو می گیره و در خونه جدید ذخیره می کنه
	Next
	
	Msgbox(ar(ar.Length - 1),"") 							' خونه آخر آرایه رو نشون می ده

 

[مجید آرتا 5,874]

سلام

در کنار راهنمایی های دوستمون به این لینک هم سری بزنید »

سورس کد حدس کلمه ( ساده و مبتدی ) - ســـورس کـــدهـا - مرکز پاسخگویی به سوالات برنامه نویسی

[alirezaghdc 4]

خدا خیرتون بده واقعا ممنونم

[softir 459]

در هم اکنون، alirezaghdc گفته است :

سلام

یه سوال داشتم

میخوام کاربر یه متنی رو وارد ادیت تکست بکنه بعد بشه رو حروف اون کار کرد

مثلا کاربر بنویسه

Salam

بعد برنامه بتونه بگه سومین حرف وارد شده چیه

یا بهتر بگم

کاربر تو ادیت تکست مینویسه

hi my name is ali

من تو کد نویسی برنامه بتونم به حرف 10 ام یعنی e دسترسی داشته باشم و یا هر حرف دیگه تو متن وارد شده توسط کاربر

ممنون

سلام

میشه این کار رو کرد .

دقیق تر از این بگید . مثلا بگید قرار تو برنامه دقیق چی کار کنید

[alirezaghdc 4]

در 11 دقیقه قبل، softir گفته است :

سلام

میشه این کار رو کرد .

دقیق تر از این بگید . مثلا بگید قرار تو برنامه دقیق چی کار کنید

تشکر از پاسختون

من میخوام تو برنامم رشته وارد شده را دستکاری کنم

به عنوان مثال

تو برنامه کاربر یه متنی رو وارد میکنه بعد برنامه من بیاد حروف رو تغییر بده مثلا من بتونم هرکدوم از حروف وارد شده رو تغییر بدم تو ویژوال بیسیک یا دات نت اینطوری میشد

Dim a(100) as string

a="Salam my name is ali"

a(5)=m

a(10)=n

ولی در b4a این جواب نمیده.

[softir 459]

در هم اکنون، alirezaghdc گفته است :

تشکر از پاسختون

من میخوام تو برنامم رشته وارد شده را دستکاری کنم

به عنوان مثال

تو برنامه کاربر یه متنی رو وارد میکنه بعد برنامه من بیاد حروف رو تغییر بده مثلا من بتونم هرکدوم از حروف وارد شده رو تغییر بدم تو ویژوال بیسیک یا دات نت اینطوری میشد

Dim a(100) as string

a="Salam my name is ali"

a(5)=m

a(10)=n

ولی در b4a این جواب نمیده.

مثلا منظورت اینه :

متن : ( سلام من در خانه هستم )

بعد شما بییی هر جا که حرف ( الف ) بود حذف کنی یا یه چیزه دیگه بجاش بزاری ؟

و در نهات خروجی بشه ( سلم من در خنه هستم )

[alirezaghdc 4]

در 3 ساعت قبل، softir گفته است :

مثلا منظورت اینه :

متن : ( سلام من در خانه هستم )

بعد شما بییی هر جا که حرف ( الف ) بود حذف کنی یا یه چیزه دیگه بجاش بزاری ؟

و در نهات خروجی بشه ( سلم من در خنه هستم )

ممنون بابت پاسختون

ببینید منظور من اینه

a="hi my name is alireza"

حالا این متن رو به صورت کاراکتر به کاراکتر وارد آرایه کنیم مثلا

b(1)="h"

b(2)="i"

و الی آخر