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编辑过]
加好友 
发短信
Post By：2016/3/25 18:57:00 [显示全部帖子]
