نمایش قسمتی از متن در لیبل

[member 13]

سلام وقت بخیر

متنی چند خطی در فایل txt دارم میخواهم فقط قسمتی از متنو در لیبل نمایش بدم مثلا از خط 1 تا خط 10 باید از چه کدی استفاده کنم ؟

[member 13]

کسی نیست جواب بده؟

[amir54 138]

سلام

Sub CTxt(Text As String,StartTxt As Int,LengthTxt As Int) As String
	Private tx(),Done As String
	
	tx = Regex.Split(CRLF,Text)
	
	If tx.Length-1 < (StartTxt+LengthTxt) Then LengthTxt = tx.Length-1
	
	
	For i = StartTxt To LengthTxt
		Done = Done & tx(i) & CRLF
	Next
	
	Return Done
End Sub

Text = متن شما

StartTxt = از چه خطی شروع بشه از صفر شروع میشه یعنی 0 همون خط اول ماست

LengthTxt = اینم تعداد خط هاست اینم از 1 شروع میشه

[member 13]

خیلی ممنون 

فقط label1.Text را باید مساوی چی و در کجا باید قرار بدم؟

[member 13]

در 44 دقیقه قبل، amir54 گفته است :

سلام

Sub CTxt(Text As String,StartTxt As Int,LengthTxt As Int) As String
	Private tx(),Done As String
	
	tx = Regex.Split(CRLF,Text)
	
	If tx.Length-1 < (StartTxt+LengthTxt) Then LengthTxt = tx.Length-1
	
	
	For i = StartTxt To LengthTxt
		Done = Done & tx(i) & CRLF
	Next
	
	Return Done
End Sub

Text = متن شما

StartTxt = از چه خطی شروع بشه از صفر شروع میشه یعنی 0 همون خط اول ماست

LengthTxt = اینم تعداد خط هاست اینم از 1 شروع میشه

خیلی ممنون

فقط label1.Text را باید مساوی چی و در کجا باید قرار بدم؟

[amir54 138]

در 2 ساعت قبل، member گفته است :

خیلی ممنون

فقط label1.Text را باید مساوی چی و در کجا باید قرار بدم؟

سلام میشه

Label1.Text = CTxt(Label.Text,0,10)

 

[member 13]

ممنون حل شد