تقييم الموضوع :
  • 1 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
[نقاش] رفع مهارة المبرمج
#1
Thumbs Up 
من الامور المتواجدة في المبرمج هو الخيال الواسع لديه في تطوير البرمجيات بأسلوب مهني وذلك عن طريق الممارسة في كتابة الاكواد بصورة مختلفة وهو كتابة كود معين لعمل إجراء معين دون اللجوء الى استخدام إجراء موجود مسبقا في net FrameWork فعمل مثل هذه الاكواد تساعد على رفع تسبة الخيال البرمجي لدى المبرمج وهذا ما أراه ( ايش رايكم في الكلام هذا صحيح أو غير صحيح)
فمشاركتي هذه تختصر في كتابة كود يقوم بتقسيم وتخزين قيمة نصية في مصفوفة أحادية البعد من دون إستخدام الاداة (string.split) فمثلا عندي قيمة نصية تساوي
dim StrValue as string = Hello World From Earth To sky
فبعد تقسيم القيمة ووضعها في مصفوفة تصبح قيمتها كالاتي
index(0) = Hello
index(1) = World
index(2) = From
index(3) = Earth
index(4) = To
index(5) = Sky
بالامكان تقسيم هذه القيمة بمجرد استدعاء الاجراء string.split
dim array() as string = StrValue.split
ولكن انا عندي كود يقوم بالتقسيم دون اللجوء الى هذا الاجراء وهو

Dim StrValue As String = "Hello World From Earth To Sky"
Dim array1(0) As String
Dim chr As Char = " "c
Dim IndexCounter As Integer = 0
For i As Integer = 0 To StrValue.Length - 1

Dim SpaceIndex As Integer = StrValue.IndexOf(" ")
If SpaceIndex = -1 Then
Exit For
End If
If chr = StrValue(i) Then
Dim index As Integer = StrValue.IndexOf(" ")
array1(IndexCounter) = StrValue.Substring(0, index)
Dim RemoveUsedStr As String = StrValue.Remove(0, index).TrimStart
StrValue = RemoveUsedStr
IndexCounter += 1
i = 0
ReDim Preserve array1(IndexCounter)
End If

Next
array1(IndexCounter) = StrValue
For Each item As String In array1
Console.WriteLine(item)
Next

إن شاء ماكنتش طولت عليكم وان شاء الله يكون الكود مفهوم ........ والمغزى من طرحي لهذا الموضوع هو ان يكون هناك مشاركات مختلفة لا تختصر في كيفية عمل كود معين لإجراء معين بل كيف تم عمل هذا الكود مثل string.split فياريت يكون هناك مشاركات أخرى من الاعضاء وشكرا
الرد }}}
تم الشكر بواسطة: raoe-041 , mohammedvego , mohammedvego


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


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