ادد کردن یه فایل تکست(txt) به عنوان منو در لیست ویو

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

ببخشید سر درد دارم نمیتونم به مانیتور خیره بشم و کدتون رو چک کنم ببینید من یک نمونه میزلرم واستون شما کدو کپی کنید و اجرا کنید کل مفهمو میگیرد و خودتون مشکلتون رو حل می کنید

[b][color=#0000FF]Sub [/color][color=#000000]Globals
[/color][/b][b][color=#0000FF]Dim[/color][color=#000000] lsvTest [/color][color=#0000FF]As[/color][color=#008B8B]ListView[/color][color=#000000]
[/color][color=#0000FF]End Sub[/color][color=#000000]

[/color][color=#0000FF]Sub [/color][color=#000000]Activity_Create(FirstTime [/color][color=#0000FF]As[/color][color=#000000] Boolean)
   lsvTest.Initialize([/color][color=#800000]"lsvTest"[/color][color=#000000])
   [/color][color=#008B8B]Activity[/color][color=#000000].AddView(lsvTest, [/color][color=#800080]0[/color][color=#000000], [/color][color=#800080]0[/color][color=#000000], [/color][color=#800080]100%x[/color][color=#000000], [/color][color=#800080]100%y[/color][color=#000000])
   lsvTest.TwoLinesLayout.ItemHeight = [/color][color=#800080]40dip[/color][color=#000000]
   lsvTest.TwoLinesLayout.Label.Top = [/color][color=#800080]0[/color][color=#000000]
   lsvTest.TwoLinesLayout.Label.Left = [/color][color=#800080]0[/color][color=#000000]
   lsvTest.TwoLinesLayout.Label.Width = [/color][color=#800080]50%x[/color][color=#000000]
   lsvTest.TwoLinesLayout.Label.Height = [/color][color=#800080]40dip[/color][color=#000000]
   lsvTest.TwoLinesLayout.Label.Gravity = [/color][color=#0000FF]Gravity[/color][color=#000000].CENTER_VERTICAL
   lsvTest.TwoLinesLayout.Label.Color = [/color][color=#0000FF]Colors[/color][color=#000000].Red
   lsvTest.TwoLinesLayout.Label.TextSize = [/color][color=#800080]18[/color][color=#000000]

   lsvTest.TwoLinesLayout.SecondLabel.Top = [/color][color=#800080]0[/color][color=#000000]
   lsvTest.TwoLinesLayout.SecondLabel.Left = [/color][color=#800080]50%x[/color][color=#000000]
   lsvTest.TwoLinesLayout.SecondLabel.Width = [/color][color=#800080]50%x[/color][color=#000000]
   lsvTest.TwoLinesLayout.SecondLabel.Height = [/color][color=#800080]40dip[/color][color=#000000]
   lsvTest.TwoLinesLayout.SecondLabel.Gravity = [/color][color=#0000FF]Gravity[/color][color=#000000].CENTER_VERTICAL
   lsvTest.TwoLinesLayout.SecondLabel.Color = [/color][color=#0000FF]Colors[/color][color=#000000].Blue
   lsvTest.TwoLinesLayout.SecondLabel.TextColor = [/color][color=#0000FF]Colors[/color][color=#000000].Yellow
   lsvTest.TwoLinesLayout.SecondLabel.TextSize = [/color][color=#800080]18[/color][color=#000000]

   [/color][color=#0000FF]For[/color][color=#000000] i = [/color][color=#800080]0[/color][color=#0000FF]To[/color][color=#800080]100[/color][color=#000000]
       lsvTest.AddTwoLines([/color][color=#800000]"Test1"[/color][color=#000000] & i, [/color][color=#800000]"Test2"[/color][color=#000000] & i)
   [/color][color=#0000FF]Next[/color][color=#000000]
[/color][/b][b][color=#0000FF]End Sub[/color][/b]

[mahfelsoft 130]

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

[نیما قبادی 246]

شما فکر کنم جایی اینارو عوض کردید

listview1.AddTwoLines2(text,text2,i)

خوب فونت شما بزرگه که داره میزنه بیرون

</pre>