Question

vb中的checkbox如何使用

Answer 1

checkbox传递一个布尔值，不选中为“false"，同时也为“0”，选中时值为“true”，同时也为“1”
在检测其值时，这样判断：
if
request.form("checkboxname")
=
true
then...
或
if
request.form("checkboxname")
=
1
then...
if
request.form("checkboxname")
=
false
then...
或
if
request.form("checkboxname")
=
0
then...

Answer 2

添加5个check控件，作为数组，添加一个command控件，然后编写以下代码，无论选择几个选项，点击command后都会提示的，如果你的选项很多，只要改代码中的For
i
=
0
To
4 ，然后在select
case中多加入几个条件判断 即可Private
Sub
Command1_Click()
Dim
k
As
Integer
Dim
sum
As
Integer
For
i
=
0
To
4
k
=
Check1(i).Value
sum
=
sum
+
k
Next
i
Select
Case
sum
Case
0
MsgBox
"您没有选择"
Case
1
MsgBox
"您选择了1个选项"
Case
2
MsgBox
"您选择了2个选项"
Case
3
MsgBox
"您选择了3个选项"
Case
4
MsgBox
"您选择了4个选项"
Case
5
MsgBox
"您选择了5个选项"
End
Select
End
Sub
附送效果图：