منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : سؤال بخصوص النصوص
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
عندي هذا النص في متغير اريد ان اجلعه في سطر واحد بدلا من انه اسفل بعض 
إقتباس :  "likes": {
     "data": [
       
     ],
     "summary": {
        "total_count": 181
     }
(20-07-20, 04:32 PM)اليوم السابع كتب : [ -> ]عندي هذا النص في متغير اريد ان اجلعه في سطر واحد بدلا من انه اسفل بعض 
إقتباس :  "likes": {
     "data": [
       
     ],
     "summary": {
        "total_count": 181
     }

????
السلام عليكم ورحمة الله وبركاته
تفضل
كود :
 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       TextBox1.Text = TextBox1.Text.Replace(" ", "")
       Dim AllData() As String = TextBox1.Text.Split(" ")

       For i As Integer = 0 To AllData.Length - 1
           TextBox2.Text &= AllData(i) & " "
       Next
   End Sub
(21-07-20, 03:49 AM)ابراهيم ايبو كتب : [ -> ]السلام عليكم ورحمة الله وبركاته
تفضل
كود :
 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       TextBox1.Text = TextBox1.Text.Replace(" ", "")
       Dim AllData() As String = TextBox1.Text.Split(" ")

       For i As Integer = 0 To AllData.Length - 1
           TextBox2.Text &= AllData(i) & " "
       Next
   End Sub

شكرا لك يا قائد