فايلهاي TXT

[hrj1981]

دوستان با سلام
چگونه مي توان مقادير يك فايل TXT را داخل يك ليست باكس ريخت؟

[vahid_d_0101]

ببخشید من خیال کردم نوشتید تکست باکس
http://www.barnamenevis.org/forum/showthread.php?t=105389&highlight=%D8%AE%D9%88%D8%A7%D9%86%D8%AF%D9%86+%D9 %81%D8%A7%DB%8C%D9%84+txt
http://www.barnamenevis.org/forum/showthread.php?t=8544&highlight=%D8%AE%D9%88%D8%A7%D9%86%D8%AF%D9%86+%D9 %81%D8%A7%DB%8C%D9%84+txt
http://www.barnamenevis.org/forum/showthread.php?t=99087&highlight=%D8%AE%D9%88%D8%A7%D9%86%D8%AF%D9%86+%D9 %81%D8%A7%DB%8C%D9%84+txt

[Mbt925]

روش مستقیمی وجود نداره.

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

[اوبالیت به بو]

Dim strText, FileName As String
Dim Counter, FileNumber As Integer
و


CommonDialog1.Filter = "Text File | *.txt"
CommonDialog1.ShowOpen
FileName = CommonDialog1.FileName
FileNumber = FreeFile
Open FileName For Input As #FileNumber
While Not (EOF(FileNumber))
Input #FileNumber, strText
List1.AddItem strText
Wend
Close #FileNumber
پست مشابه:

http://barnamenevis.org/forum/showpost.php?p=526125&postcount=5

http://barnamenevis.org/forum/showthread.php?t=106978&highlight=%D8%B1%D9%8A%D8%AE%D8%AA%D9%86
نمونه ديگه:

http://www.barnamenevis.org/forum/showpost.php?p=539249&postcount=6