+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] جعل النص فى الوسط داخل الليست بوكس (/showthread.php?tid=23272)
جعل النص فى الوسط داخل الليست بوكس - ابو روضة - 10-01-18
السلام عليكم ورحمة الله وبركاته
لدى كلمات على الانترنت تحت بعض مثلا هكذا
خارجي out
أخرى other
لذلك so
[b]ماذا what[/b]
ولما بعرضهم داخل الليست بوكس الكلام هذا بكون جنب بعضه
وانا اريد يظهر تحت بعضه لكنه يظهر هكذا خارجي out أخرى other لذلك so ماذا what
فكيف اجعله يظهر تحت بعضه زى ما هو فى الموقع هكذا
أخرى other
لذلك so
ماذا what
وقت time
فوق up
يذهب go
حول about
[b]من غير than[/b]
RE: جعل النص فى الوسط داخل الليست بوكس - طالب برمجة - 10-01-18
أضف كل سطر لوحده عن طريق ListBox1.Items.Add
قإذا كان النص غير مقسم، فقم بتقسيمه عن طريق Split وسنتج لديك مصفوفة قم بإضافتها عن طريق ListBox1.Items.AddRange
RE: جعل النص فى الوسط داخل الليست بوكس - ابو روضة - 10-01-18
(10-01-18, 07:23 PM)طالب برمجة كتب : أضف كل سطر لوحده عن طريق ListBox1.Items.Add
قإذا كان النص غير مقسم، فقم بتقسيمه عن طريق Split وسنتج لديك مصفوفة قم بإضافتها عن طريق ListBox1.Items.AddRange
النص مقسم وتحت بعضه استادى فى الموقع
RE: جعل النص فى الوسط داخل الليست بوكس - طالب برمجة - 10-01-18
أقصد لما تحضر النص من الموقع أين ستكون النتيجة
فإذا كان في متغير String فيجب تقسيمه
PHP كود :
Dim txt As String = 'النص من الموقع'
Dim sp() As String = txt.Split(vbNewLine)
ListBox1.Items.AddRange(sp)
RE: جعل النص فى الوسط داخل الليست بوكس - ابو روضة - 10-01-18
(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تحت بعض اخى واعتذر لك
RE: جعل النص فى الوسط داخل الليست بوكس - طالب برمجة - 10-01-18
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
RE: جعل النص فى الوسط داخل الليست بوكس - ابو روضة - 10-01-18
(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
الله يكرم اصلك اخى فعلا نجحت ماشاء الله عليك