第一问答网»论坛 › 中问网 › 问答 › vb取文本框里的内容去掉空格，进来看看，谢谢 ...

vb取文本框里的内容去掉空格，进来看看，谢谢

[复制链接]

11 |

4 | 2013-8-12 17:36:39 | 显示全部楼层 |阅读模式

Private Sub Form_Click()
Dim s As String
s = Text1.Text
s = Replace(s, " ", "")
Text1.Text = sEnd Sub就是replace 这个函数...

使用道具举报

千问 | 2013-8-12 17:36:39 | 显示全部楼层

Private Sub Command1_Click()
Dim strInput As String
Dim strTmp() As String
Dim flag As Boolean
strInput = Text1.Text
strTmp = Split(strInput, " ")
For i =...

使用道具举报

千问 | 2013-8-12 17:36:39 | 显示全部楼层

Private Sub Command1_Click()MsgBox TrimBlank("aa
bb
cc")End SubPublic Function TrimBlank(ByVal sTxt As String) As StringDo While InStr(sTxt, "")0sTxt = Repl...

使用道具举报