تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] جعل النص فى الوسط داخل الليست بوكس
#1
السلام عليكم ورحمة الله وبركاته
لدى كلمات على الانترنت تحت بعض مثلا هكذا
خارجي out
أخرى other
لذلك so

[b]ماذا what[/b]

ولما بعرضهم داخل الليست بوكس الكلام هذا بكون جنب بعضه

وانا اريد يظهر تحت بعضه لكنه يظهر هكذا خارجي out أخرى other لذلك so ماذا what
فكيف اجعله يظهر تحت بعضه زى ما هو فى الموقع هكذا
أخرى other
لذلك so
ماذا what
وقت time
فوق up
يذهب go
حول about
[b]من غير than[/b]
الرد }}}
تم الشكر بواسطة:
#2
أضف كل سطر لوحده عن طريق ListBox1.Items.Add
قإذا كان النص غير مقسم، فقم بتقسيمه عن طريق Split وسنتج لديك مصفوفة قم بإضافتها عن طريق ListBox1.Items.AddRange
الرد }}}
تم الشكر بواسطة:
#3
(10-01-18, 07:23 PM)طالب برمجة كتب : أضف كل سطر لوحده عن طريق ListBox1.Items.Add
قإذا كان النص غير مقسم، فقم بتقسيمه عن طريق Split وسنتج لديك مصفوفة قم بإضافتها عن طريق ListBox1.Items.AddRange

النص مقسم وتحت بعضه استادى فى الموقع

الرد }}}
تم الشكر بواسطة:
#4
أقصد لما تحضر النص من الموقع أين ستكون النتيجة
فإذا كان في متغير String  فيجب تقسيمه
PHP كود :
Dim txt As String 'النص من الموقع'
Dim sp() As String txt.Split(vbNewLine)
ListBox1.Items.AddRange(sp
الرد }}}
تم الشكر بواسطة:
#5
(10-01-18, 07:38 PM)طالب برمجة كتب : أقصد لما تحضر النص من الموقع أين ستكون النتيجة
فإذا كان في متغير String  فيجب تقسيمه
PHP كود :
Dim txt As String 'النص من الموقع'
Dim sp() As String txt.Split(vbNewLine)
ListBox1.Items.AddRange(sp

هذا كود لقراءة نص من موقع
كود :
Imports System.Text
Imports System.Net

Public Class Form1
   Dim _wb As New WebClient
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       _wb.Encoding = Encoding.UTF8
       ListBox1.Items.Add(_wb.DownloadString("http://facebook-groups.ahlamontada.com/h9-page"))

     

   End Sub
End Class
وهو ما استعمله فى البرنامج لكن النصوص بتظهر جنب بعض وانا اريد
تحت بعض اخى واعتذر لك
الرد }}}
تم الشكر بواسطة:
#6
PHP كود :
Dim txt As String _wb.DownloadString("http://facebook-groups.ahlamontada.com/h9-page")
Dim sp() As String txt.Split(vbNewLine)
ListBox1.Items.AddRange(sp

إذا لم ينجح فغير vbNewLine ب vbLf
الرد }}}
#7
(10-01-18, 08:05 PM)طالب برمجة كتب :
PHP كود :
Dim txt As String _wb.DownloadString("http://facebook-groups.ahlamontada.com/h9-page")
Dim sp() As String txt.Split(vbNewLine)
ListBox1.Items.AddRange(sp

إذا لم ينجح فغير vbNewLine ب vbLf

الله يكرم اصلك اخى فعلا نجحت ماشاء الله عليك
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تظليل التكست بوكس عند وضع المؤشر مصمم هاوي 2 144 02-03-24, 08:48 AM
آخر رد: مصمم هاوي
  بحث بالكومبو بوكس لا ى جزء من النص Lathe1 3 440 28-02-24, 02:59 AM
آخر رد: معاند الحظ
  [سؤال] كيفية انشاء فورم داخل مشروعى عاصم النجار 2 304 05-01-24, 12:36 AM
آخر رد: HALIM ELEULMA
  حماية عمود داخل ورقة الاكسل العيدروس 3 190 05-01-24, 12:21 AM
آخر رد: HALIM ELEULMA
  [VB.NET] استخلاص جزء محدد من نص وإضافته إلى بداية النص ؟ AmeenRashed 2 213 02-01-24, 10:06 AM
آخر رد: AmeenRashed
  كيف ارسل مجموع 3 تكست بوكس إلى واحد بالترتيب ؟ أبووسم 3 330 18-12-23, 05:17 PM
آخر رد: أبووسم
  [سؤال] توزيع الارقام على أكثر من تكست بوكس أبووسم 11 692 17-11-23, 12:04 AM
آخر رد: أبووسم
  هل الداتا قراد فيو تسمح بتعدد الاسطر داخل الخلية عند جلب بيانات نصية طويله من قاعدة ب khalidalwdi 3 460 10-11-23, 11:08 AM
آخر رد: khalidalwdi
  يوجد مشكلة عند تحميل البيانات فى كمبوبوكس داخل داتا جريد new_programer 2 473 17-10-23, 06:51 PM
آخر رد: new_programer
  كود تغيير قيمة تكست بوكس فى تاريخ معين Ahmed.vb 2 906 11-10-23, 10:35 PM
آخر رد: aljzazy

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم