باز کردن فایل در list

[www.pc3enter.tk]

سلام دوستان
چگونه می توانم اطلاعات فایل نودپد را در لیست باکس بیاورم
باتشکر

[sinaavakh]

ye listbox roie formet bezar ie command va yek compozit CommonDialog file
bad in kodro bare commandet benvis


Dim A As String
CommonDialog1.FileName = ""
CommonDialog1.Filter = "*.txt(*.txt)|*.txt"
CommonDialog1.ShowOpen
If CommonDialog1.FileName = "" Then Exit Sub
List1.Clear
Open CommonDialog1.FileName For Input As #1
Do Until EOF(1) = True
Line Input #1, A
List1.AddItem A
DoEvents
Loop
Close #1

hala vaghti ejra koni roie commnd kilik koni mitoni adrese file text bediiiii va neveshte hato toie listboxet bebini age bekhay toie text boxetam bebini bayad ghablesh khasite multi line text boxetam true bashe

age moshkeli dashti behem paiam bede
mofagh bashi

[returnx]

قانون شماره 11
همانطور که از عنوان سایت پیداست اینجا یک سایت فارسی زبان است، بنابراین کلیه مطالبی که در سایت مطرح می شوند می بایست به زبان فارسی نوشته شوند، مگر مطالبی که از یک منبع خارجی که به زبان دیگری است نقل قول شود. ارسال مطالب به زبان ساختگی Fingilish ( متونی که در آنها عبارات فارسی با کاراکترهای انگلیسی نوشته می شوند – برای مثال عبارت "سلام" به صورت "salam" نوشته می شود ) نیز اکیداً ممنوع می باشد.

جناب sinaavakh (http://barnamenevis.org/member.php?178428-sinaavakh) در این فروم باید فقط به زبان فارسی بنویسید چون طبق قوانین نوشتن به زبان Finglish ممنوع است ...
لطفا قوانین (http://barnamenevis.org/showthread.php?51814-%D9%82%D9%88%D8%A7%D9%86%DB%8C%D9%86-%DA%A9%D9%84%DB%8C-%D8%B3%D8%A7%DB%8C%D8%AA)سایت را مطالعه بفرمایید.

[www.pc3enter.tk]

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

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

باتشکر

[محسن واژدی]

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

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

باتشکر

سلام علیکم
در یک لیست باکس هرتعداد متن که Add کنید بصورت آیتم قرار میگیرد که برای تغییر دادن آیتم آخصی به عنوان نمونه برای تغییر دادن آیتم شماره 3 باید اونو بصورت زیر تغییر دهید:

List1.List(3)="EditedItem"

دستور بالا آیتم شماره سه را گرفته و رشته "EditedItem" را جایگزین آیتم انتخاب شده میکند

موفق باشید