Question

在vb6.0中的字符串中含有"「"，该如何去掉？ 如字符串"「abc「「"如何去掉为"abc"

有以下一个截屏，截屏中的"「"为非打印字符，怎么去除？

Answer 1

Private Sub Form_Load()
Dim s1 As String, s2 As String, s3 As String, i As Integer
s1 = "「abc「「"
s2 = ""
For i = 1 To Len(s1)
s3 = Mid(s1, i, 1)
If s3 <> "「" Then s2 = s2 + s3
Next i
MsgBox s2
End Sub

追问

我已知道如何去除了，这个符号对应的并非打印符号，而是ASCII表中的NUT符，值为0，只能通过ASCII码判断。判断如果是NUT符则删除此NUT符。

Answer 2

直接把它替换掉就可以：Replace("「abc「「", "「", "")

追问

请注意，这个字符为非打印字符，我只是用了一个有些像的"「"替换了一下，所以不能从键盘上输入的，真正的这个字符如我的图所示

追答

那根据ASCII码用Chr函数得到字符，再用Replace函数替换一下就可以：
a="「abc「「"
Replace(a, Chr("0"), "")

Answer 3

按你的这个情况可以检测扩展名长度 超3位截掉最后的字符