مشکل با لیست

[coco 1,746]

سلام

من داشتم برنامه ای مینوشتم و میخواستم با کلیک روی گزینه ذخیره اطلاعات یک آبجکت توی یک لیست ذخیره بشه.

و با زدن بازیابی اون اطلاعات داخل یک لیبل برگرده.

میشه راهنمایی کنید؟

یک فیلم آموزشی هم دیدم ولی نشد

الان مشکل اینه که اطلاعات ذخیره نمیشه.

اینم کد :

Sub Save_Click
   write
End Sub
Sub re_Click
   read
End Sub


Sub write
   list1.Add(n)
   File.writelist(File.DirDefaultExternal,"list.txt",list1)
End Sub


Sub read
   If File.Exists(File.DirInternal,"list.txt") Then
       Dim list1 As List
       list1 = File.readlist(File.DirInternal,"list.txt")
       td.text=list1.Get(0)
   End If
End Sub

[coco 1,746]

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

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

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

کد »

Sub Save_Click
   write
End Sub
Sub re_Click
   read
End Sub


Sub write
   Dim list1 As List
   list1.Initialize
   list1.Add(td.Text)
   File.writelist(File.DirInternal,"list.txt",list1)
End Sub


Sub read
   If File.Exists(File.DirInternal,"list.txt") = True Then
       Dim list1 As List
       list1 = File.readlist(File.DirInternal,"list.txt")
       td.text=list1.Get(0)
   End If
End Sub

[coco 1,746]

کد »

Sub Save_Click
   write
End Sub
Sub re_Click
   read
End Sub


Sub write
   Dim list1 As List
   list1.Initialize
   list1.Add(td.Text)
   File.writelist(File.DirInternal,"list.txt",list1)
End Sub


Sub read
   If File.Exists(File.DirInternal,"list.txt") = True Then
       Dim list1 As List
       list1 = File.readlist(File.DirInternal,"list.txt")
       td.text=list1.Get(0)
   End If
End Sub

با تشکر فراوان حل شد*tashvigh**tashvigh**hoho*

[shahab.msb 326]

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

منظورت از n چیه؟ داخل این متغیر چی گذاشتی که میخوای ذخیره کنی؟

[coco 1,746]

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

منظورت از n چیه؟ داخل این متغیر چی گذاشتی که میخوای ذخیره کنی؟

n یه عدد از نوع int هست که تو لیبل نمایش داده میشه و میخوام این عدد ذخیره شه و بعد از ورود دوباره به بر نامه با زدن دکمه بازیابی عدد برگردونده شه

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

دوست من شما اومدی متنو توی DirDefaultExternal ذخیره کزدید بعد اومدید توی DirInternal میخای Read کنید ؟

داریم آیا ؟

شما بیا DirDefualtExternal رو تعییر بهده به DirInternal درست میشه.

[coco 1,746]

دوست من شما اومدی متنو توی DirDefaultExternal ذخیره کزدید بعد اومدید توی DirInternal میخای Read کنید ؟

داریم آیا ؟

شما بیا DirDefualtExternal رو تعییر بهده به DirInternal درست میشه.

ببخشید دقت نکردم

ولی باز هم درست نشد

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

n چیه آیا ؟

[coco 1,746]

n چیه آیا ؟

N یه int هست که داخل یه لیبل نمایش داده میشه

[محمد احمدی 70]

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