本帖最后由 魔导 于 2012-3-8 20:26 编辑
小弟这样做的(蒙出来的),请各位大大帮忙看看。
单选可不可以 分开来设置 比如 第一组默认第五个 第二组默认第二个
这样对不对,请指教更好的方法
Func _CreateTab($x)
$aTabItem[$x] = GUICtrlCreateTabItem('JS-' & $x)
Local $j_x = 32, $j_y = 20, $j_Jy = 40
For $i = 0 To 11
$aCheckbox[$i + 1][$x] = GUICtrlCreateCheckbox($aCkTxt[$i], 10, $j_Jy + $j_y * $i, 70, 15)
GUICtrlSetState($aCheckbox[$i + 1][$x],1)
GUIStartGroup()
For $ii = 0 To 7
$zxc[$ii] = GUICtrlCreateRadio($aRdTxt[$ii], _
80 + $j_x * $ii, $j_Jy + $j_y * $i, 30, 17);此声明是为了便于ID使用
Assign($aCheckbox[$i + 1][$x] & '_' & $ii,$zxc[$ii], 2)
GUICtrlSetState($zxc[1],1)
Next
If Not IsInt($i / 2) Then $j_Jy += 20
Next
EndFunc
|