找回密码
 加入
搜索
查看: 2853|回复: 6

[AU3基础] [已解决]如何实时更新窗体中的文字?

  [复制链接]
发表于 2010-11-30 16:46:49 | 显示全部楼层 |阅读模式
本帖最后由 meteor0330 于 2010-12-1 22:07 编辑

程序窗体上半部分是一个下拉框,下半部分是显示相关介绍

目标是:选择下拉框中的某项后,点确定,下半部分的相关介绍会更新?

请问如何写呀??
谢谢@@

评分

参与人数 1金钱 +10 收起 理由
afan + 10 感谢主动将修改帖子分类为[已解决],请继续 ...

查看全部评分

发表于 2010-11-30 19:10:01 | 显示全部楼层
本帖最后由 KLU3K 于 2010-11-30 19:22 编辑

#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 171, 77, -1, -1)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Combo1 = GUICtrlCreateCombo("", 12, 12, 145, 25, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "请选择|1+1=?|2+2=?", "请选择")
GUICtrlSetOnEvent(-1, "Combo1Change")
$Label1 = GUICtrlCreateLabel("↑在上面选一个吧!", 12, 44, 146, 17, $SS_CENTER)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        Sleep(100)
WEnd

Func Combo1Change()
        $Ver = GUICtrlRead($Combo1)
        Select
                Case $Ver = "请选择"
                        GUICtrlSetData($Label1, "别选我啊!往下选!")
                Case $Ver = "1+1=?"
                        GUICtrlSetData($Label1, "等于2")
                Case $Ver = "2+2=?"
                        GUICtrlSetData($Label1, "不会做!囧rz")
        EndSelect
EndFunc   ;==>Combo1Change

Func Form1Close()
        Exit
EndFunc   ;==>Form1Close

↑以上代码选择后文字直接发生变化,无确定按钮


↓以下代码是按下确定按钮后文字发生变化
#include <ComboConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 171, 77, -1, -1)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Combo1 = GUICtrlCreateCombo("", 12, 12, 100, 25, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "请选择|1+1=?|2+2=?", "请选择")
$Button1 = GUICtrlCreateButton("确定", 116, 8, 47, 25)
GUICtrlSetOnEvent(-1, "Button1Click")
$Label1 = GUICtrlCreateLabel("↑在上面选一个吧!", 12, 44, 146, 17, $SS_CENTER)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        Sleep(100)
WEnd

Func Button1Click()
        $Ver = GUICtrlRead($Combo1)
        Select
                Case $Ver = "请选择"
                        GUICtrlSetData($Label1, "别选我啊!往下选!")
                Case $Ver = "1+1=?"
                        GUICtrlSetData($Label1, "等于2")
                Case $Ver = "2+2=?"
                        GUICtrlSetData($Label1, "不会做!囧rz")
        EndSelect
EndFunc   ;==>Button1Click

Func Form1Close()
        Exit
EndFunc   ;==>Form1Close


第一个部分代码是选择后直接生效,第二部分是按确定按钮才生效。
如果有用,给个评分!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×

评分

参与人数 3金钱 +50 收起 理由
runking + 15
meteor0330 + 10 新手钱太少,只能给这么多了!谢谢
afan + 25

查看全部评分

发表于 2010-11-30 20:53:55 | 显示全部楼层
2+2=0哈哈,
 楼主| 发表于 2010-12-1 10:21:04 | 显示全部楼层
回复 2# KLU3K


    谢谢!!!!!
 楼主| 发表于 2010-12-1 22:06:37 | 显示全部楼层
今天把程序都写好了!呵呵,早点来这里就好了!!!
发表于 2011-2-7 23:59:39 | 显示全部楼层
很好的东西  学习了
发表于 2011-2-13 13:15:35 | 显示全部楼层
很好的东西  学习了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 01:08 , Processed in 0.091410 second(s), 25 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表