社区 › C# › 关于如何处理在vb.net里汉字乱码问题

fzg_2000 发表于 2005-1-14 16:51:00

关于如何处理在vb.net里汉字乱码问题

我用如下代码去处理
但出现的是乱码
如何解决，不胜感激                       
                               Dim mtextObject As .AcadMText
                                                       Dim mtextString As String
                                                       Dim insertionPoint(2) As Double
                                                       Dim width As Double
                                                       '定义文本的宽度，书写位置
                                                       width = 45
                                                       insertionPoint(0) = pointTop(0) - 116.0# : insertionPoint(1) = pointTop(1) + 7.0# : insertionPoint(2) = pointTop(2)
                                                       mtextString = "\U+2205 \U+2770"
                                                       Dim Acadapp As AutoCAD.AcadApplication
                                                       On Error Resume Next
                                                       Acadapp = GetObject(, "AutoCAD.Application")
                                                       Acadapp.ActiveDocument.ActiveTextStyle.fontFile = "C:\WINDOWS\Fonts\simsun.ttf"
                                                       mtextObject = Acadapp.ActiveDocument.ModelSpace.AddMText(insertionPoint, width, mtextString)

雪山飞狐_lzh 发表于 2005-1-16 21:31:00

你直接用汉字不行么？

fzg_2000 发表于 2005-1-18 00:33:00

用单文本(AddText)直接输入汉字，显示正常
而用多本文(AddMText）则是乱码

查看完整版本: 关于如何处理在vb.net里汉字乱码问题