If  $Msg=$Nhap Then MsgBox (0,"Tool Xóa File", Example())
	 WEnd

	#include <MsgBoxConstants.au3>

Example()

Func Example()
    Local Const $sMessage = "Chọn thư mục"
    Local $sFileSelectFolder = FileSelectFolder($sMessage, "")
    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "Không có thư mục được chọn.")
    Else
        MsgBox($MB_SYSTEMMODAL, "", "Bạn đã chọn thư mục:" & @CRLF & $sFileSelectFolder)
    EndIf
 EndFunc