想問怎樣把輸入的密碼變為*****隱藏起來

kelvinso

#NoTrayIcon
#RequireAdmin
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\..\A-DATA\ICO\1_Q9UE2_setup.ico
#AutoIt3Wrapper_outfile=kelvinso.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_UseX64=n
#AutoIt3Wrapper_Res_Description=CitiNET PXE Boot Tools
#AutoIt3Wrapper_Res_Fileversion=2.0.8.0
#AutoIt3Wrapper_Res_LegalCopyright=Kelvin So
#AutoIt3Wrapper_Res_SaveSource=y
#AutoIt3Wrapper_Res_Language=1028
#AutoIt3Wrapper_Res_Field=ProductName|CitiNET PXE Boot Tools
#AutoIt3Wrapper_Res_Field=CompanyName|城市網絡電腦系統
#AutoIt3Wrapper_Res_Field=網址|http://www.citinet.com.hk
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_UseAnsi=y
#Region ;**** 參數創建於 ACNWrapper_GUI ****
#AutoIt3Wrapper_UseAnsi=y
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#include <File.au3>

;

;

#include <EditConstants.au3>



;

;

Global $String, $Drive, $Dir, $File, $Ext

Local $ES_pass = "12345"

Func RunProgram()
        $String = "GHOST32.EXE -noide -nousb -no1394 -z5"
        _PathSplit($String, $Drive, $Dir, $File, $Ext)
        Run($String,"", @SW_SHOW)
        ;MsgBox(0, "", $Drive & StringTrimRight($Dir, 1))
        Exit
       
EndFunc   ;==>RunProgram


#If FileExists("X:\WXPE\SYSTEM32\ccomscl.dll") And FileExists("X:\WXPE\SYSTEM32\DRIVERS\ccomscl.sys") Then

        If InputBox("提示", "          先学做人，后学技术。                                                        人品第一，技术第二。                                                                                  请输入密码：") = $pass Then
       
                FileInstall("citinet.bmp", @WindowsDir & "\temp\", 1)
                $Form1 = GUICreate("CitiNET Computer System Co., LTD.", 357, 261, -1, -1)
                $Pic1 = GUICtrlCreatePic(@WindowsDir & "\temp\citinet.bmp", 0, 0, 357, 145)
                $Button1 = GUICtrlCreateButton("运行", 56, 200, 73, 25)
                $Button2 = GUICtrlCreateButton("退出", 208, 200, 81, 25)
                ;$Label1 = GUICtrlCreateLabel("公司網址 公司郵箱", 0, 245, 103, 17)
                $Label2 = GUICtrlCreateLabel("Powered By : Kelvin So", 225, 245)
                GUISetState(@SW_SHOW)
                #NoTrayIcon
                GUISetState(@SW_SHOW)

                ;将string改为你需要的数值
                While 1
                        $nMsg = GUIGetMsg()
                        Switch $nMsg
                                Case $GUI_EVENT_CLOSE
                                        Exit
                                Case $Button1
                                        RunProgram()
                                Case $Button2
                                        Exit
                        EndSwitch
                WEnd
        EndIf
#EndIf

怎樣才可以把輸入的密碼變為******

謝謝

afan

InputBox('提示', '        先学做人，后学技术。        ' & @LF & _
                '        人品第一，技术第二。        ' & @LF & @LF & _
                '        请输入密码：', '', '*M', -1, 150)

xiaochuan

手册上有的。
;要求用户输入密码, 不要忘了验证!
Local $passwd = InputBox("安全检查", "输入您的密码.", "", "*")

;要求用户输入一个 1 或 2 个字符.  The M in the password
;在密码字段中的 M 表示不接受空字符串,
;2 表示响应最多 2 个字符长.
Local $value = InputBox("测试", "输入 1 或 2 个字符代码.", "", " M2")