Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
下载信息 [文件大小: 下载次数: ] | |
![]() |
创新
呵呵,顶你一下,不过代码的效率实不太好,我给你一个合理的:
Dim pm As WinForm.Label = e.Form.Controls("Label1")
Dim s As String = "请输入关键字→"
Dim l As Integer = pm.Text.length
pm.text = s.SubString(0,iif(s.length = l,1,l+1))