ارسال دو متغیر با استفاده از Sender

[majid08 266]

سلام

ایا امکان ارسال دو متغیر با استفاده از Sender وجود داره

من در یک اکتیویتی چندین متن و با ایدی های مختلف از دیتابیس انلاین میگیرم و نمایش میدم

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

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

سلام

 

موقع ایجاد مولتی پنل توی حلقه فور به جای اینکه متن رو از دیتابیس بخونی بدی به تگ باتن ، بیا و فقط i رو مساوی تگ قرار بده.

button1.Tag=i

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

Dim matnl As List
Dim idl As List

بعد توی حلقه فور گفتم که به جای اینکه متن رو بریزی توی تگ ، ادش کن به لیست ، ایدی هم همینطور...:

matnl.Add(از دیتابیس)
idl.Add(ایدی)

حالا اگه میخوای ایدی و متن رو ببری اونور دوتا متغیر روی پراسز تعریف کن:

Sub Process_Globals
Dim id As String
Dim matn As String
End Sub

و موقع کلیک روی باتن به این صورت بخونش:

Sub button1_Click
	Dim b As Button
	b=Sender
	
	id=idl.Get(b.Tag)
	matn=matnl.Get(b.Tag)
End Sub

و برای استفاده تو اکتیویتی بعدی هم که میدونی... main.matn و...

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

سلام

بله دوست عزیز میشه

شما کلا یک دکمه با یک EventName  می سازید و به وسیله Sender   می تونید این عمل رو انجام بدید

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

نمونه های زیادی از این موزد توی انجمن موجوده.