بسم الله الرحمن الرحيم، السلام عليكم و رحمة الله و بركاته
سأتناول في هذا الموضوع إن شاء الله معلومات بسيطة لا يعرفها العديد من المبرمجين- هل تعلم بأنه يمكنك أن تكتب أكثر من سطر برمجي في نفس السطر بإستخدام " : " للفصل بين كل سطر؟
مثل
كود :
MsgBox("Line1") : MsgBox("Line2")
- هل تعلم بأنه يمكنك أن تكتب سطر برمجي واحد مقسماً إياه على أكثر من سطر بإستخدام " _" بشرط أنه لا يمكنك تقسم كلمة واحدة على سطرين؟
مثل
كود :
MsgBox( _
"Line1" _
)
- هل تعلم بأنه يمكنك أن تستخدم If في سطر واحد؟
مثل
كود :
Dim bool1 As Boolean = True
If bool1 Then MsgBox("True")
Dim bool2 As Boolean = False
If bool2 Then MsgBox("True") Else MsgBox("False")
- هل تعلم أستخدام With مباشرتاً بعد الـConstructor؟
مثل
كود :
Dim pt As New Point With {.X = 3, .Y = 4}
أو
كود :
Dim pt As New Point(1, 2) With {.X = 3, .Y = 4}
لكن في هذه الحالة تكون الغلبة للقيم المعطاه لـWith إذ أنه يأخذ الأمر ببناء المتغير أولاً ثم يضع قيم With لخصائصه
- هل تعلم بأنه يمكنك أستبدال If condition = False بـ If Not condition ؟
- هل تعلم بأن النوع Boolean يمكنه أستقبال أكثر من قيمة في الوقت ذاته و جمعهم في قيمة واحدة؟
مثل
كود :
Dim bool As Boolean = True = False = False
في هذا الحالة bool = False لأنه يبدأ الأستقبال من أول قيمة (True) ثم بعد ذلك كل False تعكس قيمة bool و كل True لا تؤثر في شئ
- هل تعلم أن TypeOf Var Is Type وظيفتها التأكد من أن نوع المتغير Var هو النوع Type و في حال وجدت المتغير من هذا النوع أو من نوع أحد أبناء النوع Type ترجع True و إن وجدته من نوع آخر ترجع False؟
- هل تعلم أنه في حالة أستخدامك لأكثر من حلقة تكرارية مثلاً For أكثر من مرة داخل بعضها و كتبت في واحدة Exit For فإنه يخرج من الحلقة الداخلية فقط و تُستكمل الحلقة الكُبرى؟
مثل
كود :
For I As Integer = 0 To 10
For II As Integer = 0 To 20
For III As Integer = 0 To 30
Exit For
Next
Next
Next
- هل تعلم أنه عند أستخدامك Return داخل Sub فإنها تعمل كأنها Exit Sub ؟
- هل تعلم أنه عند أستخدامك Return فارغة في Sub أو Return Value في Function فإن الكود المكتوب بعدها لا ينفذ؟ (أي تعمل بمثابة Exit Sub أو Exit Function لكن تعيد قيمة في الـFunction)
تلك معلومات بسيطة طريفة أتمنى يكون أحد أستفاد منها
و السلام عليكم و رحمة الله و بركاته