给由数组创建的单选设置默认？[已解决]
本帖最后由 魔导 于 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)
Next
If Not IsInt($i / 2) Then $j_Jy += 20
Next
EndFunc 第 12 与 13 行对调 回复 2# afan
单选可不可以 分开来设置 比如第一组默认第五个 第二组默认第二个 ? 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)
Next
If Not IsInt($i / 2) Then $j_Jy += 20
Next
GUICtrlSetState(Eval($aCheckbox[$x] & '_5'), 1)
GUICtrlSetState(Eval($aCheckbox[$x] & '_2'), 1)
EndFunc ;==>_CreateTab 回复 4# afan
谢谢A大 原来是 Eval($aCheckbox[$x] & '_2'){:1_588:}
我还以为要写新数组呢（[标签页][复选][单选]）
页:
[1]