French [Astuce]Tester facilement l'orientation de l'écran

[zolive33]

Une petite astuce toute bête pour tester si l'on est en mode portait ou en mode paysage :

Sub Activity_Resume

   If Activity.Width > Activity.Height Then
      Msgbox ( "paysage", "test")
   Else
      Msgbox ( "portrait", "test")
   End If
   
End Sub