495910670 发表于 2013-1-27 14:12:35

如何使用循环语句创建35个复选框Checkbox,每个复选框一个名称用来调用

本帖最后由 495910670 于 2013-1-27 14:14 编辑

GUICreate("复选框练习", 230, 350)
$okbutton = GUICtrlCreateButton("确定", 56, 310, 60)
$escbutton = GUICtrlCreateButton("关闭", 173, 310, 60)
$i=0
$j=0
$k=1
While $j<5
        While $i<7                                       
                GUICtrlCreateCheckbox($k,30*$i+10, $j*33+20, 30)
                $k=$k+1       
                $i=$i+1
        WEnd
        $j=$j+1
        $i=0
WEnd
GUISetState(@SW_SHOW)
While 1       
$msg = GUIGetMsg()
Select          
        Case $msg = $okbutton
               
       Case $msg = $escbutton
           WinClose("复选框练习")   
      ExitLoop
EndSelect
WEnd


这样创建出来的复选框没有名称,没法获取某个复选框的状态,怎样才能用循环语句创建出的复选框都有名称,可以很好地获取某个复选框的状态

netegg 发表于 2013-1-27 16:21:28

用数组呗。。。

haijie1223 发表于 2013-1-27 16:36:50

数组 for to next

zch11230 发表于 2013-1-27 20:57:49

$Form1 = GUICreate("Form1", 100, 710, -1, -1)
For $i=1 To 35
        Assign("CheckBox"&$i,GUICtrlCreateCheckbox("CheckBox"&$i,10,5+(($i-1)*20),200))
Next

GUISetState(@SW_SHOW)

For $i=1 To 35 Step 2
        GUICtrlSetState(Eval("CheckBox"&$i),1)
Next


Do
        Sleep(10)
Until GUIGetMsg() = -3
主要是Assign和Eval。
页: [1]
查看完整版本: 如何使用循环语句创建35个复选框Checkbox,每个复选框一个名称用来调用