دوستان این کد چه مشکلی داره که کار نمیکنه

[afraz11 246]

سلام این از کدم اصلا درست کار نمیکنه کد من که مشکلی نداره لطفا کمک کنید

در ضم اگه کسی آپدیت کتابخونه phoneرو داره برام پیوست کنه تشکر

 

این کدیه که تو چک باکس قرار دادم

 

Sub CheckBox1_CheckedChange(Checked As Boolean)
Try
	If CheckBox1.Checked=True Then

	
	File.WriteString(File.DirInternal,"aaa.txt",CheckBox1)
	Else If CheckBox1.Checked=False Then

	File.Delete(File.DirInternal,"aaa.txt")
	End If
	
	Catch
	End Try
End Sub

و اینم کدی که تو اکتویتی یه صفحه دیگه نوشتم تا اگه شرایط باشه صفحه رو روشن نگهداره

If File.Exists(File.DirInternal,"aaa.txt")=True Then
CheckBox1.Checked=True
g.KeepAlive(True)
Else
CheckBox1.Checked=False
g.KeepAlive(False)
End If

 

[shahab.msb 326]

بجای این دستور g.KeepAlive(False)  برای خاموش شدن صفحه از دستور زیر استفاده کنید

 

 

g.ReleaseKeepAlive   این دستور صفحه رو خاموش میکنه

[afraz11 246]

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

 

این کد شما میاد چک میکنه صفحه موبایل هنگام اجرای برنامه اگه چک باکس تیک خورده باشه صفحه روشن میمونه در غیر اینصورت صفحه به روال

عادی برمیگرده و خاموش میشه

 

 

لطفا به این تایپک یه سری بزنید بدرد کارتون میخوره

 

http://answercenter.ir/topic/37-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%B1%D9%88%D8%B4%D9%86-%D9%86%DA%AF%D8%A7%D9%87-%D8%AF%D8%A7%D8%B4%D8%AA%D9%86-%D8%B5%D9%81%D8%AD%D9%87-%D9%85%D9%88%D8%A8%D8%A7%DB%8C%D9%84/?hl=%D8%B1%D9%88%D8%B4%D9%86+%D9%85%D8%A7%D9%86%D8%AF%D9%86+%D8%B5%D9%81%D8%AD%D9%87

 

مشکلم اینکه وقتی چک باکس فعال میشه یعنی تیکش گذاشته میشه صفحه کار میکنه(یعنی روشن میمونه) ولی وقتی تیکشو بر میدارم بدون شک باید صفحه خواموش شه ولی خاموش نمیشه

[shahab.msb 326]

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

 

این کد شما میاد چک میکنه صفحه موبایل هنگام اجرای برنامه اگه چک باکس تیک خورده باشه صفحه روشن میمونه در غیر اینصورت صفحه به روال

عادی برمیگرده و خاموش میشه

 

 

لطفا به این تایپک یه سری بزنید بدرد کارتون میخوره

 

http://answercenter.ir/topic/37-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%B1%D9%88%D8%B4%D9%86-%D9%86%DA%AF%D8%A7%D9%87-%D8%AF%D8%A7%D8%B4%D8%AA%D9%86-%D8%B5%D9%81%D8%AD%D9%87-%D9%85%D9%88%D8%A8%D8%A7%DB%8C%D9%84/?hl=%D8%B1%D9%88%D8%B4%D9%86+%D9%85%D8%A7%D9%86%D8%AF%D9%86+%D8%B5%D9%81%D8%AD%D9%87

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

هدفتون از این کد چیه :

	(File.WriteString(File.DirInternal,"aaa.txt",CheckBox1

اونجایی که نوشتین چک باکس محض الاعتون بگم باید یک رشته بهش بدید.شما اومدید فقط نوشتید CheckBox1 ?  این معنی نداره.

شما بجای CheckBox1  بنویسید "1" بهتره.