تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] سؤال : كيف اضم عدد صحيح الى نص لكي ينتج متغير جديد سبق تعريفه
#1
dim no1, no2, no3 as string

no1 = "ali"
no2 = "ameer"
no3 = "ahmed"

dim i as integer
for i=1 to 3

textbox.text = no & i

next

اريد ان يضهر في صندوق النص قيمة المتغير (no1) ثم قيمة المتغير (no2) ثم الثالث

ولا اريد ان تضهر "no1" نفسها بل قيمتها النصية

ارجو المساعدة Smile
الرد
تم الشكر بواسطة:
#2
مافيه داعي لجملة For
كود :
       Dim no1, no2, no3 As String
       no1 = "ali"
       no2 = "ameer"
       no3 = "ahmed"

       TextBox1.AppendText(no1 & vbNewLine & no2 & vbNewLine & no3)
الرد
تم الشكر بواسطة: sami2015
#3
شكرا لردك يا سعود ولكني اريد الفكرة وليس البرنامج بحد ذاته
اريد طريقة لضم النص "no" مع (i) وعندما افعل ذلك بالطريقة العادية سيضهر في صندوق النص "no1 no2 no3" في حين انا اريد قيمها كمتغيرات وليس كنصوص .
الرد
تم الشكر بواسطة:
#4
اخي الكريم فاهم عليك والكود اللي كتبت لك يلبي المطلوب . باستثناء اضافة رقم وههذه بسيطة فقط اضف الاسماء الى قائمة  من نوع
كود :
Listof(string)
كود :
       Dim lst As New List(Of String)
       Dim no1, no2, no3 As String
       no1 = "ali"
       no2 = "ameer"
       no3 = "ahmed"
       lst.Add(no1)
       lst.Add(no2)
       lst.Add(no3)
       TextBox1.Clear()
       For a = 0 To lst.Count - 1
           TextBox1.AppendText(lst.Item(a) & ": " & a & vbNewLine)
       Next
الرد
تم الشكر بواسطة: Fantastico , sami2015 , محمود رغمان
#5
نعم هذا يلبي المطلوب
الرد
تم الشكر بواسطة:
#6
معذرة على التدخل ولكن ربما تقصد طريقة المصفوفات
وهو نفس الكود تقريبا

     
PHP كود :
       Dim no(3) As String
        no
(1) = "ali"
 
       no(2) = "ameer"
 
       no(3) = "ahmed"
 
       TextBox1.Clear()
 
       Dim i As Integer
        For i 
1 To 3

            TextBox1
.Text &= no(i) & " "

 
       Next 
ويمكن ترك no() فارفة عند التعريف dim
كهذا
PHP كود :
       Dim no() As String 
لتعريف عدد كبير من الاسماء وليس 3 فقط
الرد
تم الشكر بواسطة: Fantastico


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] سلام سؤال تحويل رابط حاتمي 5 107 16-05-19, 02:29 PM
آخر رد: elgokr
  سؤال بخصوص نقل بيانات faysal13_13@hotmail.com 1 94 27-04-19, 10:32 PM
آخر رد: saoud2
  [VB.NET] سؤال بخصوص فتح الشاشات khalid475 3 101 25-04-19, 09:18 PM
آخر رد: elgokr
  [VB.NET] سؤال بخصوص datetimepicker في الداتا جريد فيو jassim316 7 170 25-04-19, 09:28 AM
آخر رد: elgokr
  اضافة صف جديد لدلتا جريد مرتبط nourmandour 5 103 24-04-19, 02:46 PM
آخر رد: elgokr
  [VB.NET] سؤال بخصوص client server dubai.eig 3 105 23-04-19, 11:40 AM
آخر رد: elgokr
  سؤال حول تنسيق لون مربع نص المتألق9 3 110 19-04-19, 02:31 AM
آخر رد: المتألق9
  [نقاش] سؤال محير جداااااا وارجو المساعده faysal13_13@hotmail.com 6 137 18-04-19, 11:52 AM
آخر رد: اسامه الهرماوي
  سؤال بخصوص DOEVENTS ومشكله بالكود dametucorazon 5 186 15-04-19, 09:24 AM
آخر رد: elgokr
  سؤال حول TextBox مرتبط ب WebBrowser ارجو رد من الاخ DK-x وشكرا للاخ بدري حاتمي 4 113 09-04-19, 06:16 PM
آخر رد: حاتمي

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


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