هـــل يمكن أختصــار هذأ الكــود بستخدام for ؟؟

[ياسرهتهت]

بسم الله الرحمن الرحيم

هـــل يمكن أختصــار هذأ الكــود بستخدام FOR ؟؟
او باي وسيلة وهل هنالك طريقة افضل لكتابة هذا الكود ؟
على اساس التسمية مرتبة للانبتات وعددها كبير..http://www.abc4web.net/vb/images/icons/icon9.png...http://www.abc4web.net/vb/images/icons/icon9.png.؟

أكثر من الوارد في الكود المكتوب http://www.abc4web.net/vb/images/icons/icon9.png.http://www.abc4web.net/vb/images/icons/icon9.png؟


Input.SetText("Input13", Input.GetText("Input1").." "..Input.GetText("Input7").."\r\n"..Input.GetText("Input2").." "..Input.GetText("Input8").."\r\n"..Input.GetText("Input3").." "..Input.GetText("Input9").."\r\n"..Input.GetText("Input4").." "..Input.GetText("Input10").."\r\n"..Input.GetText("Input5").." "..Input.GetText("Input11").."\r\n"..Input.GetText("Input6").." "..Input.GetText("Input12"));


موفقين بإذن الله ... لكم مني أجمل تحية .

:abc_152::abc_152::abc_152:

[عبود عبود]

السلام عليكم ورحمة الله وبركاته

هل تقصد هكذا ؟ :

--
x = "" ;
for i=1, 12 do
t = Input.GetText("Input"..i);
x = x .. t .. " " ;
end
Input.SetText("Input13", x);

أم تقصد هكذا ؟ :

--
x = "" ;
i = 1 ;
while i < 13 do
t = Input.GetText("Input"..i);
x = x .. t .. " " ;
i = i + 1 ;
end
Input.SetText("Input13", x);

أم تقصد هكذا ؟ :

--
x = "" ;
i = 0 ;
repeat i = i + 1
t = Input.GetText("Input"..i);
x = x .. t .. " " ;
until i==12
Input.SetText("Input13", x);


:abc_138: إختر ما تريد منهم فكلهم واحد فى النتيجة :abc_138:

[ياسرهتهت]

السلام عليكم ورحمة الله وبركاته

هل تقصد هكذا ؟ :

--
x = "" ;
for i=1, 12 do
t = Input.GetText("Input"..i);
x = x .. t .. " " ;
end
Input.SetText("Input13", x);

أم تقصد هكذا ؟ :

--
x = "" ;
i = 1 ;
while i < 13 do
t = Input.GetText("Input"..i);
x = x .. t .. " " ;
i = i + 1 ;
end
Input.SetText("Input13", x);

أم تقصد هكذا ؟ :

--
x = "" ;
i = 0 ;
repeat i = i + 1
t = Input.GetText("Input"..i);
x = x .. t .. " " ;
until i==12
Input.SetText("Input13", x);


:abc_138: إختر ما تريد منهم فكلهم واحد فى النتيجة :abc_138:

----------------------

بسم الله الرحمن الرحيم

شكرا لك استاذ عبود وبارك الله فيك
هذا ما رايد بالظبط :abc_152:

موفق بإذن الله ... لك مني أجمل تحية .