بستن اکتیویتی از طریق class module

[mehdi1376 44]

سلام دوستان

چطور میشه توی class module یه اکتیویتی رو finish کرد؟

ممنون

[mehdi1376 44]

سلام.

اینو برای چه کاری میخواین؟

 

کافیه این ساب رو توی کلاستون ایجاد کنید:

Sub finish(activity As Activity)
	activity.Finish
End Sub

و به این صورت توی اکتیویتی استفادش کنید:

Dim m As fn
m.finish(Activity)

(به فرض اینکه اسم کلاستون fn هست ، ما m رو از نوع کلاس تعریف کردیم و ساب رو صدا زدیم)

تست هم شد کار کرد.

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

Private Sub mListView_ItemClick (Position As Int, Value As Object)

.
.
.
.
.
.

If Value=8 Then	
StartActivity(settings)
End If
end sub

که میخوام بعد از (start activity(settings اکتیویتی فینیش بشه

[2430023 28]

سلام.

اینو برای چه کاری میخواین؟

 

کافیه این ساب رو توی کلاستون ایجاد کنید:

Sub finish(activity As Activity)
	activity.Finish
End Sub

و به این صورت توی اکتیویتی استفادش کنید:

Dim m As fn
m.finish(Activity)

(به فرض اینکه اسم کلاستون fn هست ، ما m رو از نوع کلاس تعریف کردیم و ساب رو صدا زدیم)

تست هم شد کار کرد.

من تست کردم جواب نداد

ی سورس دیگه میفرستید لطفا

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

سلام.

اینو برای چه کاری میخواین؟

 

کافیه این ساب رو توی کلاستون ایجاد کنید:

Sub finish(activity As Activity)
	activity.Finish
End Sub

و به این صورت توی اکتیویتی استفادش کنید:

Dim m As fn
m.finish(Activity)

(به فرض اینکه اسم کلاستون fn هست ، ما m رو از نوع کلاس تعریف کردیم و ساب رو صدا زدیم)

تست هم شد کار کرد.

[hanif.bakhtiyar 1]

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

Private Sub mListView_ItemClick (Position As Int, Value As Object)

.
.
.
.
.
.

If Value=8 Then	
StartActivity(settings)
End If
end sub

که میخوام بعد از (start activity(settings اکتیویتی فینیش بشه

سلام 

من همین مشکلا داشتم اینطوری برطرفش کردم

توی هر اکتیویتی تو بخش activity_pause باید Activity.finish بنویسی