-1-
-2-
' ==Using Nested If Statements==
If x > 9 Then
If x < 20 Then
MsgBox "x is between 10 and 19."
Else
If x < 30 Then
MsgBox "x is between 20 and 29"
Else
If x < 40 Then
MsgBox "x is between 30 and 39"
End If
End If
End If
Else
MsgBox "x is less than 9"
End If
' '==Using Select Case Statements==
Select Case x
Case Is < 9
MsgBox "x is less than 9"
Case 10 To 19
MsgBox "x is between 10 and 19."
Case 20, 21, 22, 23, 24, 25, 26, 27, 28, 29
MsgBox "x is between 20 and 29."
Case Else
MsgBox "x is unknown."
End Select
' '==Alternative Select Case Statement (Like If Statement==
Select Case True
Case x < 9
MsgBox "x is less than 9."
Case x > 0 And x < 20
MsgBox "x is between 9 and 19."
Case x >= 20 And x <= 29
MsgBox "x is between 20 and 29."
Case Else
MsgBox "x is unknown."
End Select
End Sub
| مسلسل | اسم الملف | المدة ب الدقيقة | لينك |
|---|---|---|---|
| 1 | 001 MS Access VBA Grouping Code , Variables And Data Types برمجة اكسيس | 18 | https://youtu.be/iT1bFbliG5E |
| 2 | 002 MS Access VBA – Writing First Code 2 programs in one form برمجة اكسيس | 16 | https://youtu.be/h-jXH_kcE4c |
| 3 | 003 MS Access VBA – Writing First 2 programs برمجة اكسيس | 14 | https://youtu.be/Z36lpESNk8k |
| 4 | 004 MS Access VBA –Decision Making if then برمجة اكسيس | 24 | https://youtu.be/phtKVh-QQ9w |
| 5 | 005 MS Access VBA –Decision Making if then elsif nested if برمجة اكسيس | 16 | https://youtu.be/IRYnGtcoJKo |
| 6 | 006 MS Access VBA –Decision Making Select Case برمجة اكسيس | 20 | https://youtu.be/32OckF0Zv6I |
| 7 | 007 MS Access VBA –Decision Making prorams part1 برمجة اكسيس | 14 | https://youtu.be/M15BE4uHWeY |
| 8 | 008 MS Access VBA –Decision Making prorams part2 برمجة اكسيس | 12 | https://youtu.be/WEDHlhWbcuA |
| 110 | قائمة ملفات تعلم اكسيس المستوى الاول MS Access 380 min | https://www.youtube.com/playlist?list=PLMmy9Ec9B98wxI2RWVrjjtyV2knTFoR1t |
-3-
-4-