2019.9.17
elseif只适用于块语句
If Check1(0).Value = 1 Then
Text1.FontBold = True
ElseIf Check1(0).Value = 0 Then
Text1.FontBold = False
ElseIf Check1(1).Value = 1 Then
Text1.FontBold = True
endif
这样是可行的那如果是这样
If Check1(0).Value = 1 ThenText1.FontBold = True
ElseIf Check1(0).Value = 0 ThenText1.FontBold = False
ElseIf Check1(1).Value = 1 ThenText1.FontBold = True
就会报错为else没有if,因为语句结构不是块语句,属于行语句。而elseif只适用于块语句。
其实我认为这个elseif这个规则很不错,适合的换行可以极大的提升代码可阅读性
Select Case Option1(Index).Value = True 这行是很重要的。定义了条件。注意case语句只能用于一个变量。
Case Index = 0 当index值为0时,则执行下一行,否则跳过
Text1.Text = "显示为红色"
Text1.ForeColor = vbRed
Case Index = 1 当index值为1时,则执行下一行,否则跳过
Text1.Text = "显示为蓝色"
Text1.ForeColor = vbBlue
Case Index = 2 当index值为2时,则执行下一行,否则跳过
Text1.Text = "显示为绿色"
Text1.ForeColor = vbGreen
End Select
特点:只能适用于一个变量
如果你的条件同时要满足 index的值,value的属性。那么case不适合这个事件。
这就像你又要吃得饱,又想吃得少。也不是没有办法,压缩饼干。
如果你非要使用case那么可以从整个模块考虑,增加一个函数。方法很多。
如果你使用控件数组,index的值就像ID一样,一个复选框对应值一个ID(index)
是来区分控件的。它是唯一的。就像你的身份证号码一样。
而名称和caption就像你的名字和绰号一样。caption属性是显示在控件上的,是看得见的
名称就是你创建的控件的名字。就和我们的名字差不多。一般不会重叠,在运行中他看不见,开发界面可以看见。你可以更改。同一控件数组需要同一名称。
caption属性就像同学给你取得绰号一样。比如我可以叫张三,你也可以叫张三。
附上 word链接
链接:https://pan.baidu.com/s/16ZrBjJjhfdYEG397GRgPIQ
提取码:a6h0
失效了在评论区dd,也可以联系我,点这里。