急!!vb里输入3个颜色的字:红绿兰怎么可以使我点下兰他就显示兰色点红就显示红色颜色代码怎么搞速
答案:2 悬赏:30
解决时间 2021-11-17 01:20
- 提问者网友:你在我眼中是最帅
- 2021-11-16 04:08
急!!vb里输入3个颜色的字:红绿兰怎么可以使我点下兰他就显示兰色点红就显示红色颜色代码怎么搞速
最佳答案
- 二级知识专家网友:浪女动了心
- 2021-11-16 04:55
添加四个Label控件,其余三个label.caption=蓝,红,绿
调整这三个label的大小,使大小和字的大小差不多
再将这三个Label放在第四个Label上,编写如下代码即可
我已经实现,要的话加我QQ:44105779 把源码给你
Option Explicit
Private Sub Label1_Click()
Label4.BackColor = vbRed
Label1.BackColor = vbRed
Label2.BackColor = vbRed
Label3.BackColor = vbRed
End Sub
Private Sub Label2_Click()
Label4.BackColor = vbGreen
Label1.BackColor = vbGreen
Label2.BackColor = vbGreen
Label3.BackColor = vbGreen
End Sub
Private Sub Label3_Click()
Label4.BackColor = vbBlue
Label1.BackColor = vbBlue
Label2.BackColor = vbBlue
Label3.BackColor = vbBlue
End Sub
调整这三个label的大小,使大小和字的大小差不多
再将这三个Label放在第四个Label上,编写如下代码即可
我已经实现,要的话加我QQ:44105779 把源码给你
Option Explicit
Private Sub Label1_Click()
Label4.BackColor = vbRed
Label1.BackColor = vbRed
Label2.BackColor = vbRed
Label3.BackColor = vbRed
End Sub
Private Sub Label2_Click()
Label4.BackColor = vbGreen
Label1.BackColor = vbGreen
Label2.BackColor = vbGreen
Label3.BackColor = vbGreen
End Sub
Private Sub Label3_Click()
Label4.BackColor = vbBlue
Label1.BackColor = vbBlue
Label2.BackColor = vbBlue
Label3.BackColor = vbBlue
End Sub
全部回答
- 1楼网友:强势废物
- 2021-11-16 05:45
我暂时保留我的看法!
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯