Diffrent ways to write a statement

Diffrent ways to write a statement

view plainprint?

1. 'Examples on how to click a button in 7 ways  
2.   
3. '###################  
4. '#### 1st method ####  
5. '###################  
6.   
7. 'Common Method  
8. Window("Flight Reservation").WinButton("Update Order").Click  
9.   
10. '###################  
11. '#### 2nd method ####  
12. '###################  
13.   
14. ' Assigning window object to an object variable  
15. Set wndObject=Window("Flight Reservation")  
16. ' Following normal syntax ( click on a button)  
17. wndObject.WinButton("Update Order").Click  
18.   
19. '            OR  
20.   
21. ' Assigning Button object to an object variable  
22. Set btnObject=Window("Flight Reservation").WinButton("Update Order")  
23. ' Clicking on button using button object variable  
24. btnObject.Click  
25.   
26. '###################  
27. '#### 3rd method ####  
28. '###################  
29.   
30. ' Using With statement  
31. With Window("Flight Reservation")          
32.             .WinButton("Update Order").click  
33. End with  
34.   
35. '###################  
36. '#### 4th method ####  
37. '###################  
38.   
39. ' Descriptive programming  
40. Window("text:=Flight Reservation").WinButton("text:=&Update Order").Click  
41.   
42. '###################  
43. '#### 5th method ####  
44. '###################  
45.   
46. ' creating a description object  
47. Set oDes=Description.Create  
48. ' assigning description to the description object  
49. oDes("nativeclass").value="Button"  
50. oDes("text").value="&Update Order"  
51. ' clicking on button using the created description object  
52. Window("text:=Flight Reservation").winbutton(oDes).click  
53.   
54. '###################  
55. '#### 6th method ####  
56. '###################  
57.   
58. ' creating a description object  
59. Set oDes=Description.Create  
60. ' Flitering the objects  
61. set btnObjList=Window("text:=Flight Reservation").ChildObjects(oDes)  
62.   
63. For objIndex=0 to btnObjList.count-1  
64.   ' Get property value from object  
65.         propVal=btnObjList(objIndex).getroproperty("text")  
66.   
67.   ' Compare property value  
68.         If propVal="&Update Order" Then  
69.   ' Click on identified object  
70.                 btnObjList(objIndex).click  
71.     ' Exit For loop after clicking on the button  
72.                 Exit for  
73.         End If  
74. Next  
75.   
76. '###################  
77. '#### 7th method ####  
78. '###################  
79.   
80. ' Assigning window object description to a constant  
81. Public const wndFlight="text:=Flight Reservation"  
82. ' Assigning Button object description to a constant  
83. Public const btnUpdate="text:=&Update Order"  
84. ' Click on a button using description constants  
85. Window(wndFlight).winbutton(btnUpdate).click