نحوه ذخیره سازی آیتم های لیست باکس

[maxvel]

سلام دوباره اومدم :لبخند:

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

چطور میشه آیتم های لیست باکس رو به ترتیب ذخیر کرد و در هنگتمه بسته شدن ذخیره بمونن و موقع باز شدن دوباره ظاهر شن!

ممنون میشم جواب بدید

[xxnagin]

سلام
شما با آموزش کامل کار با فایل ها و فولدرها در VB.NET (http://barnamenevis.org/showthread.php?342327-آموزش-کامل-کار-با-فایل-ها-و-فولدرها-در-VB.NET) اقای سیاوش ابراهیمی میتوید این این کارو کنید که راه ساده و راحت
که یه رویداد لود و سیو رو درست میکنید و که لود رو توی لود فرم و سیو رو تو formclosing فرم قرار میدید

یا با database
که کلا اقای فرید نجفلو توضیح داده

http://barnamenevis.org/showthread.php?333713-برنامه-نویسی-پایگاه-داده-به-صورت-گام-به-گام

[maxvel]

نتونستم چیزی روکه میخوامو پیدا کنم

F1 F1

کمک

[zahedi121]

سلام
چرا نتونستید پیدا کنید ؟! در همان تاپیک آموزش کامل کار با فایلها (http://barnamenevis.org/showthread.php?342327-آموزش-کامل-کار-با-فایل-ها-و-فولدرها-در-VB.NET)پست 12 دقیقا همین موضوعی که مطرح کردید بصورت فیلم آموزشی ! هست.
موفق باشید

[مهرداد صفا]

با سلام.
با استفاده از متود File.ReadAllLines و File.WriteAllLines می توانید یک آرایه از رشته را بنویسید و یا بخوانید. به این صورت:

'in the name of god
'صل الله علی محمد و آله

Public Class Form1

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
System.IO.File.WriteAllLines("FileName.txt", ListBox1.Items.Cast(Of String).ToArray)
End Sub

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
On Error Resume Next
Dim Items = System.IO.File.ReadAllLines("FileName.Txt")
If IsNothing(Items) Then
'the file is not created yet.
'so add some items to listbox items.
With ListBox1.Items
.Add("ali")
.Add("abbas")
.Add("reza")
.Add("hasan")
'.Add(...)
End With
Else
ListBox1.Items.AddRange(Items.Cast(Of Object).ToArray)
System.Media.SystemSounds.Exclamation.Play()
End If

End Sub
End Class