永发信息网

VB复选框check的value属性找不到了

答案:3  悬赏:20  手机版
解决时间 2021-04-19 23:48

我编写的如下代码:
Private Sub Check2_Click(Index As Integer)
If Check2.Value = 1 Then
Text1.FontBold = True
Else
Text1.FontBold = False
End If
End Sub
但是编写完成后运行却弹出如下提示

另外,在编写代码的过程中,提示代码也没有发现check2控件有value属性,如下图所示

最佳答案
你的CHECK2是数组控件,你用check2(0).value试试就知道了
全部回答

重新安装一下控件

你的CHECK2是多个,而且是用复制的方法放到界面中的,你选择了“是”,也就是生成了控件数组

每个CHECK2的的单击,都会触发CLICK事件,但会传一个参数INDEX,来区分你到底按下了哪个CHECK2

INDEX从0开始,1 2 3 依次类推

所以,你应该写成:

Private Sub Check2_Click(Index As Integer) If Check2(Index).Value = 1 Then

其他的不用变化即可!

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
用雅漾的隔离粉底乳,需要用卸妆水吗
JSP 怎么通过session的ID号判断这个session是
万隆鑫装潢材料商店我想知道这个在什么地方
诺基亚5320的节电保护日期条这样让它常亮?
齿轮测速传感器 原理
热血篮球电视版下载地址
为什么别人的一句话总能影响到自己的心情?
姓李的祖先是谁
单机跑跑的问题
德慧早餐店怎么去啊,有知道地址的么
可以恢复删除QQ好友的网站是多少?
裁缝145之后怎么冲又快又省钱
打死你这个搔比歌曲
血糖升高的原因有哪些,人的血糖为什么会高
Asia゛是个什么样子的家族
推荐资讯
六和塔西湖龙井茶专卖店地址在什么地方,想过
为什么我的头会这么痛
机电为什么这么难
车水马龙得句子,含有车水马龙的句子
中石油最近频繁获得它国石油为什么油价还涨?
您好,如果我购买机票后,我需要机票报销,怎
金高椅怎么去啊,有知道地址的么
3110C手机读书软件
有谁考过教师资格证吗?想了解了解
我家养的柞蚕变成蛾子从蛹里出来了,请问柞蚕
笔记本加减乘除怎么打,六乘以六等于多少?这
成都哪些地方有流动摊位卖狗崽的?
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?