بالا پایین کردن متن لیبل با سیک بار

[atakhan 3]

سلام 

خیلی خلاصه بگم

من میخوام سیک بارم که وقتی زیاد میشه مقدار value میشه 100

میخوام وقتی کم میکنم آخرش بشه -50

چطوری این کارو بکنم

 

[mshafiee110 730]

در در 1396/07/06, 14:44:19، atakhan گفته است :

سلام 

خیلی خلاصه بگم

من میخوام سیک بارم که وقتی زیاد میشه مقدار value میشه 100

میخوام وقتی کم میکنم آخرش بشه -50

چطوری این کارو بکنم

 

سلام

یه روش ساده

 

تعریف سیکبار	
	Dim SeekBar1 As SeekBar
	SeekBar1.Initialize("SeekBar1")
	SeekBar1.Max=150
	Activity.AddView(SeekBar1,0,0,-1,-2)
 
گرفتن مقدار وتبدیل به مقدار جدید
Sub SeekBar1_ValueChanged (Value As Int, UserChanged As Boolean)
	Dim newValue=Value-50 As Int
	Log(newValue)
End Sub

 

[پژمان نیکروان 6,055]

سلام

لطفا بیشتر توضیح بدید.

مثلا اگه وسط بود چی بشه؟ یا روی 20 بود؟؟

باید درست توضیح بدید تا بشه یه الگوریتم اصولی براش تنظیم کرد.