论坛 › 『 提问交流 』 › 关于点击按钮时，清空页内显示的内容，显示按钮2的内容如何实现？

木头人 发表于 2015-5-6 11:49:45

关于点击按钮时，清空页内显示的内容，显示按钮2的内容如何实现？

本帖最后由 木头人 于 2015-5-6 11:50 编辑

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>

$hGUI = GUICreate("New Window", 468, 324, -1, -1)
$Button1 = GUICtrlCreateButton("Button", 29, 43, 80, 29)
$Button2 = GUICtrlCreateButton("Button", 126, 41, 73, 35)
$Button3 = GUICtrlCreateButton("Button", 223, 42, 91, 42)
$Button4 = GUICtrlCreateButton("Button", 347, 44, 89, 30)
GUISetState()
While 15
       
$hMsg = GUIGetMsg()
        Switch $hMsg
                Case -3
                        Exit
                Case $Button1
                        _xfmd()
                Case $Button2
                        _xfmc()
                Case $Button3
                        _xfme()
                Case $Button4
                        _xfmf()
        EndSwitch
       
WEnd

Func _xfmd()
        Dim $t51
        $t51 = GUICtrlCreateLabel("   das2r43rsdf23rsdfsdfsdxvxcv", 16, 110, 550, 0)
EndFunc   ;==>_xfmd

Func _xfmc()
        Dim $t51

        $t51 = GUICtrlCreateLabel("    DLKJSDAKJLFASDKJLKLJDFSAKLJFDSA", 16, 110, 550, 0)
        $t51 = GUICtrlCreateLabel("hahhahhahh:", 16, 190, 90, 17)
        GUICtrlSetFont(-1, 9, 400, 4, "")
        GUICtrlSetColor(-1, 0x0000FF)
        GUICtrlSetCursor(-1, 0)
EndFunc   ;==>_xfmc

Func _xfme()
        Dim $t51
        $t51 = GUICtrlCreateLabel("   我是大程序呵哥哈哈全", 16, 110, 550, 0)
        $t51 = GUICtrlCreateLabel("hahhahhahh:", 16, 150, 90, 17)
EndFunc   ;==>_xfmd

Func _xfmf()
        Dim $t51
        $t51 = GUICtrlCreateLabel("   我小程序哈全", 16, 110, 550, 0)
EndFunc   ;==>_xfmd
这样做的话，变成点击按钮2或3，4按钮时，原来1按钮的内容还在，如何实现在点击其它按钮时清空原来显示的内容呢》？

木头人 发表于 2015-5-6 18:34:14

{:face (303):}没人理我。。。

cheng8457 发表于 2015-5-6 18:54:12

{:face (411):}{:face (411):}

cheng8457 发表于 2015-5-6 18:54:22

{:face (411):}{:face (411):}

查看完整版本: 关于点击按钮时，清空页内显示的内容，显示按钮2的内容如何实现？