عرض مشاركة واحدة
  #1  
قديم 30-05-2010, 03:10 PM
tarek elhamy tarek elhamy غير متواجد حالياً
مدرس حاسب الى
 
تاريخ التسجيل: Jul 2008
المشاركات: 2,572
معدل تقييم المستوى: 19
tarek elhamy is on a distinguished road
افتراضي

الاجابه صحيحه
قيمه المتغيرTotal = 140

Dim First AsInteger = 20, Second AsInteger = 40

Dim Third AsInteger = First + Second
Dim Total AsInteger
If Third <= 50 Then
Total = First + Second + Third
Else
First = 30
Second = 50
Total = First + Second + Third
EndIf
MsgBox(Total)

قيمه المتغيرTotal = 140
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين
سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه

وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه