چها عمل اصلی بر روی تکست

[sinaparsian 29]

سلام 

ما یک متن داریم با کاراکتر های متغییر می خواهیم مقداری مشخصی از این متن را در یک توست مسیج نمایش دهیم .

مثال : متن ما یک آدرس هست که همواره توسط کاربر از داخل کارت حافظه انتخاب میشود :     sdcard/android/data/1234.txt

1)  می خواهیم از سمت راست آدرس تا اولین /(اسلش) را در یک توست مسیج نمایش دهیم !!!

2) می خواهیم مقداری از متن را را به صورت خودکار select نموده ودر یک ادیت تکست paste نماییم!!!!!

 

متشکر می شم از تمامی دوستانی که  این 2 مطلب  رو به من یاد بدهند ......

 

[مهدی ایزدی 9,203]

قد و بالای تو رعنا رو بنازم

خب عزیزم این که دیگه کاری نداره

به جای اون عدد 3 که توی کد بهتون دادم بنویسید:  str.Length-1

مهم اصل صورت مسئله بودش...

موفق باشید

[sinaparsian 29]

ممنون و متشکر از استاد ایزدی 

استاد آرتا 

ودوست عزیزمون مجتبی که منو راهنمایی فرمودیید

حالا برعکس اگه بخوام از ابتدای آدرس تا آخرین اسلش رو نمایش بدم باید چه کار کنم و اسم فایل رو نشون ندم وفقط آدرس رو نمایش بدم.....

[مهران محمودی 778]

درود،

علاوه بر کدها و راهنمایی های که دوستان لطف کردن و گفتن میتونید با ترکیب متدهای Substring  و IndexOf نتیجه دلخواهتون رو به دست بیارید:

	Dim strFullAddress As String : strFullAddress = "sdcard/android/data/salam/asd/234.txt"
	Dim strAddress = strFullAddress.SubString2(0,strFullAddress.LastIndexOf("/")) As String
	Dim strFileName = strFullAddress.SubString(strFullAddress.LastIndexOf("/")+1) As String
	Log(strAddress) ' sdcard/android/data/salam/asd
	Log(strFileName) ' 234.txt

متغیر strAddress: آدرس فایل

متغیر strFileName: نام فایل

همین کد رو اجرا کنید و در قسمت لاگ ها، نتیجه رو ببینید.

موفق باشید.

[sinaparsian 29]

عالی بود این قسمت رو تازه یادم دادید ممنون و متشکر آقای محمودی 

Dim strAddress = strFullAddress.SubString2(0,strFullAddress.LastIndexOf("/")) As String

کاش واسه این مبحث یه آموزش کلی بسازید و تمامی این کد هارو آموزش بدید ممنون و متشکر از جواب کاملتون

 

 

[sinaparsian 29]

کسی بلد نیست ؟

[مهدی ایزدی 9,203]

درود

ببینید به این کار میگن جداسازی حروف منظم یا همون regex split

خب ؟

البته چندین تاپیک و آموزش و سوالات متعددی در این ضمینه قبلا پرسیده شده که بدون شک اگر جست و جو میکردید خیلی زودتر از اینها خودتون به جوابتون میرسیدید و در وقتتون صرفه جویی شده بود...

اما جواب :

Sub Globals
	Dim st As String
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout1")
	st = "sdcard/android/data/1234.txt"
End Sub

Sub Button1_Click
	Dim str() As String = Regex.Split("/",st)
	Msgbox(str(3),"")
End Sub

 

 

برای کپی کردن متن در کلیپبرد هم میتونید از کتابخانه AriaLib استفاده کنید :

 

 

سعی کنید از این به بعد سوالات خودتون رو تحت عناوین مناسب و به صورت جداگانه مطرح کنید

موفق باشید

[sinaparsian 29]

خیلی ممنونم سپاس

امر فرمودید چشم حتما

و دیگه سعی میکنم تکرار نشه

[sinaparsian 29]

سلام و عزاداری هاتون قبول 

آقای ایزدی استاد محترم من منظورمو درست نتونستم برسونم تو کدی که شما نوشتید 

کد:

Sub Button1_Click
	Dim str() As String = Regex.Split("/",st)
	Msgbox(str(3),"")
End Sub

منظورتون این بوده که بعد از سومین اسلش هرچی هست رو داخل توست مسیج نمایش بدیم 

ولی من اینو نمی خوام من منظورم این بود که آدرس متغییر هست

 یکبار

sdcard/android/data/1234.txt

ویکبار

sdcard/android/data/salam/234.txt

یکبار

sdcard/android/data/salam/asd/234.txt

و ...... الی ماشالله

چه طوری بفهمونیم که همواره در توست مسیج عبارت بعداز آخرین اسلش نمایان بشه؟؟؟؟ 

 

[مجتبی قاسمی 53]

در 12 ساعت قبل، sinaparsian گفته است :

سلام و عزاداری هاتون قبول 

آقای ایزدی استاد محترم من منظورمو درست نتونستم برسونم تو کدی که شما نوشتید 

کد:

Sub Button1_Click
	Dim str() As String = Regex.Split("/",st)
	Msgbox(str(3),"")
End Sub

منظورتون این بوده که بعد از سومین اسلش هرچی هست رو داخل توست مسیج نمایش بدیم 

ولی من اینو نمی خوام من منظورم این بود که آدرس متغییر هست

 یکبار

sdcard/android/data/1234.txt

ویکبار

sdcard/android/data/salam/234.txt

یکبار

sdcard/android/data/salam/asd/234.txt

و ...... الی ماشالله

چه طوری بفهمونیم که همواره در توست مسیج عبارت بعداز آخرین اسلش نمایان بشه؟؟؟؟ 

 

سلام

ببینین اگر میخاین اسم فایل رو از مسیر جدا کنین یعنی 234.TXT رو جدا کنین میتونین با کد:

dim s as string
s = "sdcard/android/data/salam/234.txt"
dim d = s.substring(s.LastIndexOf("/")+1)  As String
toastmassageshow(s,false)

موفق باشین 

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

سلام

واجب شد یک آموزش کاملی از توابع مربوط به رشته ها رو قرار بدیم.

یک آموزش تصویری ساده برای این توابع قرار میدیم تا دوستان آشنا بشن و سرگردون نباشن.