[求助]关于TextBox的问题
着是照着例子写的一段代码~意思是:2个Textbox在第2个textbox中输入文字时第1个textbox显示还可输入多少个字
但为什么运行起来没效果,每次都要我刷新第1个TEXTBOX才显示
请问着是怎么回事啊~
Private Sub Nei_rong_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Nei_rong.TextChanged
Dim StrIn As String
StrIn = Me.Nei_rong.Text
If Len(StrIn) = 0 Then
Me.sy.Text = 500
Else
Me.sy.Text = 500 - Len(StrIn)
End If
End Sub