Import فایل txt‌ به ListBox

[mehr83]

یک فایل text رو که اطلاعات آن با اینتر ازهم جدا شده‌اند( سطر به سر هستند) با چه کدی می‌تونم تمامی آن اطلاعات را به به صورت Item به لیست باکس اضافه کنم؟


----------------------------------------------------------------------
فروش ويژه مجموعه كامل محصولات آموزش برنامه نويسي AppDev
Asp.NET , Visual Basic.NET , Visual C#.NET , SQL Server 2008 , Web Service , LINQ , Html , Xml , SharePoint
اطلاعات بيشتر در
http://sadrasystem.org (http://sadrasystem.org/)

[f.nabavi]

سلام. از این کد استفاده کن. اگر سوال داشتی بپرس


Dim a() As String
Dim i As Integer
a = Split(TextBox1.Text, vbCrLf)
For i = 0 To UBound(a)
ListBox1.Items.Add(a(i))
Next

[kablayi]

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


Private StreamToDisplay As StreamReader
StreamToDisplay = New StreamReader(Application.StartupPath & "\textFile.txt")
TextBox1.Text = StreamToDisplay.ReadToEnd
StreamToDisplay.Close()

و برای اضافه کردن اون به لیست باکس هم از کد f.nabavi استفاه کنید...




Dim a() AsString
Dim i AsIntegera = Split(TextBox1.Text, vbCrLf)
For i = 0 To UBound(a)
ListBox1.Items.Add(a(i))
Next



موفق باشید ...