رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.

AnswerCenter

مرکز پاسخگویی به سوالات برنامه نویسی

  • مرجع پاسخگویی
  • تولید آموزش
  • سفارش پروژه

درخواست سفارش پروژه

اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

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


بایگانی شده

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

  • 0
ArmaN17

اجرای ساب

سوال

ArmaN17    0

کاربر عادی

سلام.دوستان چیکار کنم که فقط وقتی رو دکمه کلیک شد ساب اجرا بشه

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

13 پاسخ به این سوال تا کنون داده شده است

پست های پیشنهاد شده

msd313    59

کاربر رو به رشد

منظورت رو دقیق بگو؟
خود رویداد کلیک دکمه یه سابه
میخوای داخل اون چه سابی قرار بگیره

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در 6 دقیقه قبل، msd313 گفته است :

منظورت رو دقیق بگو؟
خود رویداد کلیک دکمه یه سابه
میخوای داخل اون چه سابی قرار بگیره

به فرض وقتی دکمه کلیک شد sub jobdone اجرا بشه

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
msd313    59

کاربر رو به رشد

اگه job باشه که باید با url اجرابشه و غیر ممکنه
ولی اگه هر تابعی باشه مثل زیر انجام میشه

این ساب برای دکمه بک گوشیه و گفتم وقتی دکمه بک زده شد ساب دکمه بک که توی برنامه براش کد نوشتم اجرا بشه

Sub Activity_KeyPress (KeyCode As Int) As Boolean
	If KeyCode=KeyCodes.KEYCODE_BACK Then
		btn1_bak_Click
	End If
End Sub

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در ۱ ساعت قبل، msd313 گفته است :

اگه job باشه که باید با url اجرابشه و غیر ممکنه
ولی اگه هر تابعی باشه مثل زیر انجام میشه

این ساب برای دکمه بک گوشیه و گفتم وقتی دکمه بک زده شد ساب دکمه بک که توی برنامه براش کد نوشتم اجرا بشه


Sub Activity_KeyPress (KeyCode As Int) As Boolean
	If KeyCode=KeyCodes.KEYCODE_BACK Then
		btn1_bak_Click
	End If
End Sub

 

داش میبخشید من اینو نفهمیدم میشه برای Sub cc_Result (Success As Boolean, Dir As String, FileName As String) بنویسی که وقتی کلیک شد این اجرا بشه

ممنون میشم

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
msd313    59

کاربر رو به رشد

در 13 ساعت قبل، ArmaN17 گفته است :

Sub cc_Result (Success As Boolean, Dir As String, FileName As String)

خُب همین خط رو داخل رویداد کلیک باتن بنویس البته اگه ورودی داشته باشه باید اونا رو هم توی همین رویداد بالای این خط بنویسی

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در در 1397/10/14, 06:58:02، msd313 گفته است :

خُب همین خط رو داخل رویداد کلیک باتن بنویس البته اگه ورودی داشته باشه باید اونا رو هم توی همین رویداد بالای این خط بنویسی

یه ارور میده میگه duplicate sub

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
msd313    59

کاربر رو به رشد

میشه کد ها یا سورس رو بذاری یه نگاه بندازیم

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در 3 ساعت قبل، msd313 گفته است :

میشه کد ها یا سورس رو بذاری یه نگاه بندازیم

راستش خیلی روش وقت گزاشتم نمیتونم بزارمش

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
msd313    59

کاربر رو به رشد

در در 1397/10/13, 17:01:01، ArmaN17 گفته است :

Sub cc_Result (Success As Boolean, Dir As String, FileName As String)

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

 

ولی توی اینجا من چیکار کردم؟:

کد دکمه برگضت در برنامه

Sub btn1_bak_Click
	Activity.Finish
	StartActivity(home)
End Sub

کد دکمه فیزیکی بک خود گوشی

Sub Activity_KeyPress (KeyCode As Int) As Boolean
	If KeyCode=KeyCodes.KEYCODE_BACK Then
		btn1_bak_Click
	End If
End Sub

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در 1 دقیقه قبل، msd313 گفته است :

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

میخوام وقتی روش کلیک شد عکس ارسال بشه

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
msd313    59

کاربر رو به رشد

خُب من با job مثال میزنم
 

Dim ht1 As HttpJob
ht1.Initialize(Me,"ht1")

ht1.PostFile("http//....",File.DirInternal,"aaa.jpg")

Sub jobdone(job As HttpJob)
	If job.Success Then
		ToastMessageShow("عکس ارسال شد",False)
	End If
End Sub

این بصورت معمولی با اجرای اکتیویتی فایل رو ارسال میکنه

 

حالا شما فقط خط سوم رو داخل دکمه بنویس

 

 

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در در 1397/10/19, 16:10:47، msd313 گفته است :

خُب من با job مثال میزنم
 


Dim ht1 As HttpJob
ht1.Initialize(Me,"ht1")

ht1.PostFile("http//....",File.DirInternal,"aaa.jpg")

Sub jobdone(job As HttpJob)
	If job.Success Then
		ToastMessageShow("عکس ارسال شد",False)
	End If
End Sub

این بصورت معمولی با اجرای اکتیویتی فایل رو ارسال میکنه

 

حالا شما فقط خط سوم رو داخل دکمه بنویس

 

 

 

نمیشه دادا

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
ArmaN17    0

کاربر عادی

در 4 دقیقه قبل، ArmaN17 گفته است :

نمیشه دادا

فهمیدم چیکار کنم الان

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
مهمان
این موضوع برای عدم ارسال قفل گردیده است.

×
×
  • جدید...