以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  Cells(1,1).Range.Text.Trim 怎么删除后面的字符？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177490)

--  作者：xluoping --  发布时间：2022/5/24 17:17:00 --  Cells(1,1).Range.Text.Trim 怎么删除后面的字符？ ..... dim str as string = Cells(1,1).Range.Text.Trim 以上代码得到的  str 后面有一串字符（像方框），怎么代码删除掉？

--  作者：狐狸爸爸 --  发布时间：2022/5/24 17:23:00 --   得先知道这个方框是什么字符，用asc函数看看这个方框的asc编码： dim str as string = Cells(1,1).Range.Text.Trim messagebox.show(asc(str1(str1.length-1)))

--  作者：有点蓝 --  发布时间：2022/5/24 17:23:00 --   dim str as string = Cells(1,1).Range.Text msgbox(str) str = str.substring(0,str.length - 自己数数特殊字符的个数填入这里)

--  作者：狐狸爸爸 --  发布时间：2022/5/24 17:25:00 --   要不这样吧： dim str as string = Cells(1,1).Range.Text.Trim str = str.trim(str(str.length-1))