رفتن به مطلب
  • 0

مشکل در تنظیمات نور صفحه


alirezn

سوال

سلام
 
من با استفاده از چک باکس و کد زیر واسه برنامم تنظیمات گذاشتم، وقتی تیک رو میزنم صفحه روشن میمونه و درست کار میکنه ولی وقتی تیک رو بر میدارم، بازم صفحه روشن میمونه

:(

 
	Mood = Not(Mood)
 If Mood Then
    keep.KeepAlive(Mood)
	ToastMessageShow("صفحه روشن خواهد ماند",False)
 Else
   keep.KeepAlive(Mood)
   ToastMessageShow("صفحه روشن نخواهد ماند",False)
 End If
لینک ارسال
به اشتراک گذاری در سایت های دیگر

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

ارسال های توصیه شده

درود

شما کلا از True یا False استفاده کنید کافیه  :fekr:  با یک متغیر از توی Boolean که توی همون شرط قرار بدید.

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

درود

شما کلا از True یا False استفاده کنید کافیه  :fekr:  با یک متغیر از توی Boolean که توی همون شرط قرار بدید.

یعنی این فایده نداره؟

 

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

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

یه همچین چیزی حدودا :

Sub Globals
Dim p As PhoneWakeState
Dim bool As Boolean
End Sub

Sub Button1_Click
	If bool = False Then
		p.KeepAlive(True)
		ToastMessageShow("صفحه روشن خواهد ماند",False)
		bool = True
	else if bool = True Then
		p.KeepAlive(False)
		ToastMessageShow("صفحه روشن نخواهد ماند",False)
		bool = True
	End If
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

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

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...