代码如下
Private Sub TextBox1_Change()
Dim i As Integer
Dim strs As String
Dim reg As Object, reg1 As Object
Set reg = CreateObject("vbscript.regexp")
Wi
代码如下
Private Sub TextBox1_Change()
Dim i As Integer
Dim strs As String
Dim reg As Object, reg1 As Object
Set reg = CreateObject("vbscript.regexp")
Wi
2538

被折叠的 条评论
为什么被折叠?
——文本框中限制输入标点符号和汉字&spm=1001.2101.3001.5002&articleId=103809904&d=1&t=3&u=3a68cef7fed74e239cc9ac80b6187436)