表单构建复选框
表格中的复选框,使用OleObjects集合进行调用,方法如下:
Sub xx()
Sheet2.OLEObjects("Checkbox1").Object.Value = True
'OLEObjects("Checkbox1").Object就表示CheckBox1对象
'.Value表示复选框选中状态
'=True表示选中
' Sheet2.OLEObjects("Checkbox1").Object.Value = True代码的意思就是选中CheckBox1复选框
MsgBox SHeet2.OLEObjects("Checkbox2").Object.Value
End Sub
可以在Sheet2表格里面添加两个复选框CheckBox1和Checkbox2进行测试。
急求!!!ASP表单中含有多个复选框该怎么做啊?把这些复选框编上号,如:ch1,ch2......
1.如要预选(网页调入时就打上钩):
在ASP语句中先按条件给变量bz赋值,
bz="" (不打钩)
或
bz="checked" (打钩)
再加入复选框,如下(下面为2选,1、3不选):
<%
for i=1 to gs '复选框个数
bz=""
if i=2 then
bz="checked"
end if
%>
<input type="checkbox" <%=bz%> id="ch<%=i%>">
<%
next
%>
2.如要处理选中的:
脚本中遍历所有复选框,对选中的进行处理:
for i=1 to gs '复选框个数
a1="ch"&cstr(i)
if document.all(a1).checked then
..........
end if
next
3.动态定选中:
脚本: document.all(a1).checked=true