如何使用VB.NET显示注册商标符号(®)?
-
26-09-2019 - |
题
我已经接管支持在该公司工作我的申请。突然之间,客户希望能够在栏中输入的注册商标。符号,用ALT + 0174,被正确保存,但应用无法正常对其进行编码。本质上,这是我在做什么:
Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
Dim ms As New MemoryStream
Dim xml_text_writer As New XmlTextWriter(ms, _
System.Text.Encoding.UTF8)
xml_text_writer.Formatting = Formatting.Indented
xml_text_writer.Indentation = 4
xml_text_writer.WriteStartDocument(True)
xml_text_writer.WriteStartElement("Employees")
MakeEmployee(xml_text_writer, txtFName.Text, txtLName.Text, 11111)
xml_text_writer.WriteEndElement()
xml_text_writer.WriteEndDocument()
xml_text_writer.Flush()
ms.Flush()
ms.Position = 0
Dim b(CInt(ms.Length) - 1) As Byte
ms.Read(b, 0, CInt(ms.Length))
ms.Close()
Dim strReturn As String = System.Text.ASCIIEncoding.ASCII.GetString(b)
If strReturn.StartsWith("???", StringComparison.CurrentCultureIgnoreCase) Then
strReturn = strReturn.Substring(3)
End If
txtName.Text = strReturn
End Sub
Private Sub MakeEmployee(ByVal xml_text_writer As _
XmlTextWriter, ByVal first_name As String, ByVal _
last_name As String, ByVal emp_id As Integer)
xml_text_writer.WriteStartElement("Employee")
xml_text_writer.WriteStartElement("FirstName")
xml_text_writer.WriteString(first_name)
xml_text_writer.WriteEndElement()
xml_text_writer.WriteStartElement("LastName")
xml_text_writer.WriteString(last_name)
xml_text_writer.WriteEndElement()
xml_text_writer.WriteStartElement("EmployeeId")
xml_text_writer.WriteString(emp_id.ToString)
xml_text_writer.WriteEndElement()
xml_text_writer.WriteEndElement()
End Sub
我从这个代码得到的输出是这样的:
约翰 史密斯? 11111
一切都很好,除了“??”之后,“史密斯”应为“®”。什么是最好的方式,如果有,以正确显示符号?
解决方案
昏暗strReturn作为字符串= System.Text.ASCIIEncoding.ASCII.GetString(b)中
您编码UTF-8的XML,不读回为ASCII。你会失去所有不能被编码的特殊字符。修正:
Dim strReturn As String = System.Text.Encoding.UTF8.GetString(b)
不隶属于 StackOverflow