Question

VB 点击命令按钮 当label出现某数值时 TEXT 里的文字改变颜色 如何写代码

点击时 TEXT 会提示 当出现某数值时 提示的文字改变颜色

Answer 1

那很简单啊，只要增加一个label的Change事件即可，代码如下（假如当label出现5时、TEXT 里的文字颜色改变成红色）：

Private Sub Label1_Change()
If Label1.Caption = 5 Then Text1.ForeColor = vbRed
End Sub

追问

不行啊

追答

你说“当label出现某数值时”，那么在程序运行期间你有没有让label变到5呢？
这个代码的意思就是：实时监视label控件中的值有没有变成5，当然不能提前输入5哦，提前输入到label中的5是不算的哦。

追问

我QQ 627277072 你加我下 我再问 高手 我是用随机数