سوال درباره ی کد کپی

[alaghemand 82]

با سلام

 

چرا این تیکه کد زیر کار نمی کند ؟؟؟؟؟

 

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

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.

	Private Button1 As Button
	Dim a As Int = 15
	Private Label1 As Label
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("main")
	
	If File.Exists(File.DirInternal,"text.txt") = False Then
		File.Copy(File.DirAssets,"test.txt",File.DirInternal,"test.txt")
	End If
	
	Label1.Text = File.ReadString(File.DirInternal,"test.txt")

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Button1_Click
	File.WriteString(File.DirInternal,"test.txt",a)
	Label1.Text = File.ReadString(File.DirInternal,"test.txt")
End Sub

مگه اون تیکه کد اولی نمیگه که اگر وجود نداشت کپی کن

[امین شاهدی 5,773]

شما گفتی اگه text.txt وجود نداشت test.txt رو کپی کن و هربار کپی انجام میشه ! اسم هارو تصحیح کنید مشکلتون حل میشه