- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 复制粘贴内容后面为什么有一个问号？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=171718)
-- 发布时间：2021/9/7 14:08:00
-- 复制粘贴内容后面为什么有一个问号？
老师你好：
纯甄巴氏杀菌热处理原味风味酸牛乳利乐钻200g×8包(社区团购定制版)??
-- 发布时间：2021/9/7 14:09:00
--
变成这个样子了 纯甄巴氏杀菌热处理原味风味酸牛乳利乐钻200g×8包(社区团购定制版)? 现在这个产品无法使用查询功能
-- 发布时间：2021/9/7 14:37:00
--
应该是有一些看不到的字符
-- 发布时间：2021/9/7 14:49:00
--
那现在应该怎么弄一下呢？
-- 发布时间：2021/9/7 14:53:00
--
把这个单元格数据清空，重新从上面复制数据进去，去掉问号
-- 发布时间：2021/9/7 15:03:00
--
是这样的：这个名字是从别的地方引用过来的，能有办法查出来是什么字符吗？我重新复制粘贴操作以后，导入的数据还是不相符
-- 发布时间：2021/9/7 15:08:00
--
如果是导入的，导入前的数据就有问题。可以自行分析一下是什么字符：http://www.foxtable.com/webhelp/topics/1338.htm
如果不会分析就把原始数据发上来看看
-- 发布时间：2021/9/7 15:18:00
--
就是原始数据有问题，之前其它的都没有问题，这个品相怎么也不行。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:999.xls |
-- 发布时间：2021/9/7 15:37:00
--
那是一个隐形的问号，ascw宽字符编码是8203
Dim Book As New XLS.Book("D:\\问题\\999.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim s As String = Sheet(1, 6).text
Output.Show(Asc(s(s.Length -1)))
Output.Show(Ascw(s(s.Length -1)))
s = s.Replace(chrw(8203),"")
Output.Show(Asc(s(s.Length -1)))
如果使用代码导入，可以使用上面的红色代码替换掉。如果使用菜单的导入的，自己遍历单元格处理一下，如
for each r as row in tables(“表A”).rows
r("xx列") = r("xx列").Replace(chrw(8203),"")
next
-- 发布时间：2021/9/7 18:52:00
--
好的，我试一下，感谢！