vb判断一个数值是否满足条件并用红色标记

答案:4 悬赏:40 手机版

解决时间 2021-01-27 03:03

提问者网友：嘚啵嘚啵
2021-01-26 17:45

定义了一个数组a[]，数值比较并按降序排列显示，当a[0]<25时用红色标记，可为什么当上一组数的a[0]<25，红色显示了，输入下一组数，a[0]>25，它也是红色显示（随机的，并不是每次都这样）
语句如下：
if a[0]<25 then
Label.ForeColor = vbRed
end if

最佳答案

五星知识达人网友：掌灯师
2021-01-26 18:56

你的这段代码，
if a[i]<25 then
Label.ForeColor = vbRed
end if
只是当a[i]<25时执行了Label.ForeColor = vbRed，改变了Label控件的ForeColor属性为vbRed（红色）。而当a[i]>=25时什么也不做，所以Label控件的ForeColor属性仍然为vbRed（红色）。要想让Label控件的ForeColor属性为默认的黑色，就要在a[i]>=25时设置Label控件的ForeColor属性为vbBlack（黑色）
If a(i) < 25 Then 'a(i)<25，红色显示
Label.ForeColor = vbRed
Else '否则，黑色显示
Label.ForeColor = vbBlack
End If

另外，VB中的数组使用圆括号，而不是方括号。

祝你顺利！

全部回答

1楼网友：梦中风几里
2021-01-26 22:31

if a[0]<25 then Label.ForeColor = vbRed elseif a[0]>=25 then Label.ForeColor = vbwhite end if

2楼网友：归鹤鸣
2021-01-26 20:58

if a[0]<25 then ‘a[0]<25，红色显示 Label.ForeColor = vbRed else ’否则zhidao，黑色显示 Label.ForeColor = vbBlack end if 因为内Label.ForeColor一旦改变，就会保容持，除非再次被改变

3楼网友：舍身薄凉客
2021-01-26 19:44

你好！ if a[0]<25 then ‘a[0]<25，红色显示 Label.ForeColor = vbRed else ’否则，黑色显示 Label.ForeColor = vbBlack end if 因为Label.ForeColor一旦改变，就会保持，除非再次被改变打字不易，采纳哦！

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息