vv3509 发表于 2008-5-11 18:19:30

请帮忙看哈这段代码(直接就执行了Botton1事件)

While 1
        $nMsg = GUIGetMsg()
        Select
                Case $nMsg = $GUI_EVENT_CLOSE
                        Exit
                Case $Button1               <这里应改为Case$nMsg = $Button1>
                        $ipAdd = GUICtrlRead($ipAdd)
                        $Hostname = GUICtrlRead($Hostname) ;计算机名
                        $Hostname1 = GUICtrlRead($Hostname1) ;计算机描述
                        $Mask = "255.255.255.0"
                        $Gateway = "202.100.210.21"
                        MsgBox(0, "确认IP地址", "          " & $ipAdd & "          ")
                        MsgBox(0, "确认计算机名", "          " & $Hostname & "          ")
                        MsgBox(0, "确认子网掩码", "          " & $Mask & "          ")
                        MsgBox(0, "确认网关", "   " & $Gateway & "          ")
                        MsgBox(0, "确认计算机描述", "          " & $Hostname1 & "          ")
                        $OK = MsgBox(4, "确认", "确认更改以上设置吗?")
                        If $OK = 7 Then ExitLoop
                        $SetName = _SetComputerName($Hostname, $Hostname1)
                        $SetIpAdd = _SetIp($ipAdd, $Mask, $Gateway)
                        MsgBox(0, "", "更改完成")
                        ExitLoop
                Case $nMsg = $Radio1
                        $1 = _ChangeScreenRes(1024, 768, 16, 60)
                Case $nMsg = $Radio2
                        $2 = _ChangeScreenRes(800, 600, 32, 85)
        EndSelect
WEnd


[ 本帖最后由 vv3509 于 2008-5-11 22:15 编辑 ]

auto 发表于 2008-5-11 18:45:41

$Button1未定义或赋值就引用

vv3509 发表于 2008-5-11 18:54:21

前面有这段啊$Button1 = GUICtrlCreateButton("开始", 137, 152, 51, 21, 0)请问大侠一楼代码有没问题

[ 本帖最后由 vv3509 于 2008-5-11 18:55 编辑 ]

pcbar 发表于 2008-5-11 21:44:39

第52行改为
                Case $nMsg=$Button1

vv3509 发表于 2008-5-11 21:52:47

原来如此啊,非常感谢
页: [1]
查看完整版本: 请帮忙看哈这段代码(直接就执行了Botton1事件)