Advertisement
zorovhsvn

autoit - bai2

Aug 23rd, 2015
558
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.95 KB | None | 0 0
  1. #include <ButtonConstants.au3>
  2. #include <EditConstants.au3>
  3. #include <GUIConstantsEx.au3>
  4. #include <StaticConstants.au3>
  5. #include <WindowsConstants.au3>
  6. #Region ### START Koda GUI section ### Form=
  7. $Form1 = GUICreate("Form1", 534, 295, 226, 139)
  8. $Input1 = GUICtrlCreateInput("", 96, 80, 345, 21)
  9. $Button1 = GUICtrlCreateButton("Xem", 96, 144, 137, 49)
  10. $Button2 = GUICtrlCreateButton("Xóa", 304, 144, 137, 49)
  11. $Label1 = GUICtrlCreateLabel("Autoit - Bài 2", 184, 24, 178, 40)
  12. GUICtrlSetFont(-1, 24, 400, 0, "Times New Roman")
  13. GUICtrlSetColor(-1, 0xFF0000)
  14. $Button3 = GUICtrlCreateButton("Thoát", 200, 224, 137, 49)
  15. GUISetState(@SW_SHOW)
  16. #EndRegion ### END Koda GUI section ###
  17.  
  18. While 1
  19.     $nMsg = GUIGetMsg()
  20.     Switch $nMsg
  21.         Case $GUI_EVENT_CLOSE
  22.             Exit
  23.          Case $Button1
  24.             $Input1 = GUICtrlCreateInput("Hello Word", 96, 80, 345, 21)
  25.          case $Button2
  26.             $Input1 = GUICtrlCreateInput("", 96, 80, 345, 21)
  27.          case $Button3
  28.             Exit
  29.     EndSwitch
  30. WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement