تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] استفسار في كود string
#1
Exclamation 
هذا السؤال 
   Write a program which inputs two strings from the user, and which joins them together. Show the resulting string and its length in labels.
وهذا الكود  
كود :
Private Sub joinsButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles joinsButton1.Click
       Dim a(1) As String
       Dim b, c As String
       a(0) = string1TextBox1.Text
       a(1) = string2TextBox2.Text
       b = b.Join(a)
       resultLabel3.Text = b
       c = b.Length
       lingthLabel1.Text = c
   End Sub
في البداية يدخل المستخدم 2 string والبرنامج راح يجمعهم مع بعض مشكلتي في البرنامج يطلع لي ال a خطأ في الjoin و الطول مايطلعه ابدا وين تكون المشكله  Huh Huh
الرد }}}}
تم الشكر بواسطة:
#2
   
اللهم صلي علي نبي (الرحمه) محمد رسول الله وبارك علي اله وصحابته والتابعين  واحقن دماء امتنا واجعل بأسنا علي اعدائنا يا ارحم الراحمين
[b]امين [/b]



الرد }}}}
تم الشكر بواسطة: ممدوح , a_abdullah
#3
طريقة حلك صح لكن مطلوب حلها بالstring ومطلوب في السؤال طول السترنق كامل بعد مانجمع بينهم
الرد }}}}
تم الشكر بواسطة:
#4
(07-11-16, 03:35 PM)a_abdullah كتب : طريقة حلك صح لكن مطلوب حلها بالstring ومطلوب في السؤال طول السترنق كامل بعد مانجمع بينهم

   
اللهم صلي علي نبي (الرحمه) محمد رسول الله وبارك علي اله وصحابته والتابعين  واحقن دماء امتنا واجعل بأسنا علي اعدائنا يا ارحم الراحمين
[b]امين [/b]



الرد }}}}
تم الشكر بواسطة: a_abdullah , a_abdullah , ممدوح
#5
اذا فهمتك صح

كود :
Dim TEX As String = TextBox1.Text
       Dim TE2 As String = TextBox2.Text
       MsgBox(TEX & " " & TE2)
أساتذتي الكرام
Heart أبوعمر/ سعود/ممدوح الخطيب Heart
شكرا لكم
الرد }}}}
تم الشكر بواسطة: a_abdullah , ممدوح
#6
(07-11-16, 04:32 PM)zinom كتب :
(07-11-16, 03:35 PM)a_abdullah كتب : طريقة حلك صح لكن مطلوب حلها بالstring ومطلوب في السؤال طول السترنق كامل بعد مانجمع بينهم

اخر سؤال واتأسف للازعاج , ليش مانستخدم ال join  Huh

(07-11-16, 04:38 PM)جميل علي كتب : اذا فهمتك صح

كود :
Dim TEX As String = TextBox1.Text
       Dim TE2 As String = TextBox2.Text
       MsgBox(TEX & " " & TE2)

تمام عليك يجمعهم بس ابي استخدم فانكشون الjoin وال length  Huh
الرد }}}}
تم الشكر بواسطة:
#7
شوف كذا

كود :
  Dim TEX As String = TextBox1.Text
       Dim TE2 As String = TextBox2.Text
       Dim RE As String = String.Join(" ", TEX, TE2)
       MsgBox(RE)

وهذي الافضل

   
أساتذتي الكرام
Heart أبوعمر/ سعود/ممدوح الخطيب Heart
شكرا لكم
الرد }}}}
تم الشكر بواسطة: ممدوح , ممدوح , a_abdullah
#8
هذا تعديل للكود
كود :
   Private Sub joinsButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles joinsButton1.Click
       Dim a(1) As String
       Dim b, c As String
       a(0) = string1TextBox1.Text
       a(1) = string2TextBox2.Text
       b = String.Join(" ", a)
       resultLabel3.Text = b
       c = b.Length
       lingthLabel1.Text = c
   End Sub

التعديل تم فقط في السطر التالي
كود :
b = b.Join(a)

ليصبح
كود :
b = String.Join(" ", a)

أما باقي الكود ما شاء الله سليم وبخطوات منطقية،

للامام دائماً أختي الكريمة وفقك الله
الرد }}}}
تم الشكر بواسطة: جميل علي , zinom , a_abdullah
#9
(07-11-16, 06:21 PM)ممدوح كتب : هذا تعديل للكود
كود :
   Private Sub joinsButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles joinsButton1.Click
       Dim a(1) As String
       Dim b, c As String
       a(0) = string1TextBox1.Text
       a(1) = string2TextBox2.Text
       b = String.Join(" ", a)
       resultLabel3.Text = b
       c = b.Length
       lingthLabel1.Text = c
   End Sub

التعديل تم فقط في السطر التالي
كود :
b = b.Join(a)

ليصبح
كود :
b = String.Join(" ", a)

أما باقي الكود ما شاء الله سليم وبخطوات منطقية،

للامام دائماً أختي الكريمة وفقك الله

ماشاءالله لا قوة إلا بالله
أخوي ممدوح دائماً معجب بإجاباتك
زادك الله من علمه
أساتذتي الكرام
Heart أبوعمر/ سعود/ممدوح الخطيب Heart
شكرا لكم
الرد }}}}
تم الشكر بواسطة: ممدوح , a_abdullah
#10
يعطيكم العافية جميعا ماقصرتوا  Sad Heart Heart

استاذ ممدوح نحن نتعلم قليل من ما لديكم 
لكن مازال عندي اريور في الكود عند ال join لم اكتشف سببه حتى الان  Sad

الرد }}}}
تم الشكر بواسطة: ممدوح


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار بخصوص عدم ظهور اداة عرض ملف pdf في الادوات عباسة 7 148 22-02-17, 08:07 PM
آخر رد: عباسة
  [VB.NET] كيفية حل مشكلة Global.[String] فى ملف Settings.Designer.vb الماجيك مسعد 2 60 20-02-17, 03:08 AM
آخر رد: الماجيك مسعد
Wink [VB.NET] استفسار بخصوص التعديل والحفظ علي اداة datagridview dark1459 9 128 20-02-17, 02:13 AM
آخر رد: khodor1985
  استفسار عن تعبئة combobox من قاعدة البيانات المتألق9 2 75 16-02-17, 11:57 AM
آخر رد: المتألق9
  استفسار ComboBox bidaya 2 75 12-02-17, 06:18 PM
آخر رد: مساعدة
  [سؤال] استفسار بخصوص انواع كود البحث.. Marwan9990 1 98 03-02-17, 07:09 PM
آخر رد: مساعدة
  [سؤال] استفسار داخل List box عبدالرحمن المكاوي 10 176 31-01-17, 05:32 PM
آخر رد: عبدالرحمن المكاوي
  [VB.NET] استفسار بخصوص WebBrowser1 dubai.eig 2 93 28-01-17, 05:12 PM
آخر رد: dubai.eig
  استفسار عن الجداول المتعددة في قاعدة البيانات اكسس أبووسم 4 182 14-01-17, 12:36 PM
آخر رد: أبووسم
  استفسار حول (ComboBox) و (TextBox). المبرمج المبتدئ 1 10 381 05-01-17, 03:37 AM
آخر رد: المبرمج المبتدئ 1

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


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