VB大神们看看我哪里错了（编写过程DeleStr(s1,s2),将字符串s1中出现的字符串s2删去,结果仍存放在s1中）
发布网友
共1个回答
热心网友
Private Function DeleStr(ByVal s1 As String, ByVal s2 As String)
DeleStr = Replace(s1, s2, "", 1, -1, vbTextCompare)
End Function
追问结果出来还是显示错误0.0.。。。
追答Private Sub Command1_Click()
Dim s1 As String, s2 As String, s As String
s1 = InputBox("输入s1")
s2 = InputBox("输入s2")
MsgBox DeleStr(s1, s2)
End Sub
