[求助]怎样把一个字符串转换为unicode的编码方式？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]怎样把一个字符串转换为unicode的编码方式？

共有2367人关注过本帖树形打印复制链接主题：[求助]怎样把一个字符串转换为unicode的编码方式？

有点色

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/29 14:48:00 [显示全部帖子]

这个？

http://www.foxtable.com/mobilehelp/scr/0241.htm

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/29 15:28:00 [显示全部帖子]

Dim file As String = "测试"
Dim bytes() As Byte
Dim utf As Encoding = Encoding.unicode
Dim def As Encoding = Encoding.Default
Bytes = def.GetBytes(file)
Bytes = Encoding.Convert(def, utf, Bytes)
file = def.GetString(Bytes)
Output.Show(file)

有点色

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/29 15:30:00 [显示全部帖子]

回复5楼，直接用字符就可以啊。

有点色

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/30 12:48:00 [显示全部帖子]

声明或者定义函数的时候，定义成数组吧

strEzCadPath as byte()

或者

strEzCadPath as Char()

有点色

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/30 16:15:00 [显示全部帖子]

声明的时候有问题，这样写

Public Function lmc1_Initial(<MarshalAs(UnmanagedType.LPWStr)> strEzCadPath As String, xxxxxxxxxxxxxxxxxxxxxxx) As Integer

End Function

http://blog.csdn.net/donnie88888888/article/details/53435556

有点色

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/30 17:49:00 [显示全部帖子]

声明的时候，参考17楼的写法，直接填入路径即可，不需要转换。

19楼的问题。你用任意一个窗口的句柄都可以啊，比如 basemainform.handle、Forms("窗口1").Baseform.handle

下一主题 >> << 上一主题

主题：[求助]怎样把一个字符串转换为unicode的编码方式？