UC知道VB中复选框中遇到的小问题
来源：百度知道 编辑：UC知道 时间：2024/06/04 01:33:42
小弟初学VB,学习的教程中有个复选框改变字体样式的一课,粗体,斜体一类的,发现第一个框选择的话再取消字体发生变化
Private Sub Check1_Click()
Text1.FontBold = Check1.Value
End Sub
可是单独的选第2个框就不能,非要点第一个才行,取消的时候也是一样,
请问各位高人应该加什么代码才能实现可以任意选择其中的几框而改变.谢谢拉
Private Sub Check1_Click()
Text1.FontBold = Check1.Value
End Sub
可是单独的选第2个框就不能,非要点第一个才行,取消的时候也是一样,
请问各位高人应该加什么代码才能实现可以任意选择其中的几框而改变.谢谢拉
Private Sub Check1_Click() '粗体复选框
If Check1.Value = 0 Then '假如check的值为0(flase),即没有选中时，则
text1.FontBold = Flase 'label1 粗体属性为flase
Else '否则 ,即True选中状态
text1.FontBold = True 'label1 粗体属性也为True (类似按扭大同小异）
End If
End Sub