提示内容怎么清除[已解决]

清风飘飘

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("客户数据库", 290, 183, 525, 383)
$Label1 = GUICtrlCreateLabel("用户名：", 32, 48, 52, 17)
$Label2 = GUICtrlCreateLabel("密  码：", 32, 88, 52, 17)
$Input1 = GUICtrlCreateInput("输入你的用户名", 88, 48, 121, 21)
$Input2 = GUICtrlCreateInput("输入你的密码", 88, 88, 121, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

                Case $Input1
        EndSwitch
WEnd

上面的那个输入框会变成绿色，但如果单击了鼠标就不再会变成选中了，下面那个也是，我想请教一下那位高人能不能让这两个输入框内的提示变成灰色，然后点击插入时候会自动清空这个提示，谢谢！

netegg

Case $Input1
   GUICtrlsetdata($Input1, "")