| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 底色问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82850) |
| -- 作者：扶风 -- 发布时间：2016/3/25 18:57:00 -- 底色问题 Dim a As String = Forms("码数计算").Controls("TextBox2").Value Dim b As String = Forms("码数计算").Controls("TextBox1").Value Forms("码数计算").Controls("TextBox2").Value = b.Length Dim c As String = Forms("码数计算").Controls("TextBox3").Value If a = c Then e.Form.Controls("TextBox2").BackColor = Color.Green Else e.Form.Controls("TextBox2").BackColor = Color.Red End If 老师，上述发来的底色不对，请帮忙看下问题在哪里？ 我是写在Enter事件里面的。 老是返回前次的颜色。
[此贴子已经被作者于2016/3/25 19:07:33编辑过]
|
| -- 作者：Hyphen -- 发布时间：2016/3/26 8:57:00 -- Dim b As String = Forms("码数计算").Controls("TextBox1").Value Forms("码数计算").Controls("TextBox2").Value = b.Length 放到TextBox1的ValueChanged事件
|