非常急!!!!! 一个简单的问题

Question

请问有什么办法在VB中将ascii的格式专成UTF8格式的?谢谢!

Answer 1

好象不难啊，你可以引用xml4.0的阿！

Answer 2

可以根据utf-8编码规则自己写函数，关于编码规则可参考：
http://www.linuxforum.net/books/UTF-8-Unicode.html

Answer 3

大家看看,这段代码能不能反过来用啊?
Dim ANSIString() As Byte, MyEncoder As New System.Text.ASCIIEncoding() 
Dim fFile As IO.File, fStream As IO.FileStream ' Set the source string and filename 
Dim sSourceString As String = "Hello, World! This is a test!" 
Dim sFilename As String = "C:\test.txt" ' Store the ANSI encoded string in ANSIString 
ANSIString = MyEncoder.Convert(System.Text.Encoding.UTF8, System.Text.Encoding.ASCII, MyEncoder.GetBytes(sSourceString)) Try   ' Delete the file if it already exists 
  If fFile.Exists(sFilename) Then 
    fFile.SetAttributes(sFilename, IO.FileAttributes.Normal) 
    fFile.Delete(sFilename) 
  End If   ' Output the bytes 
  fStream = fFile.OpenWrite(sFilename) 
  fStream.Write(ANSIString, 0, ANSIString.Length) 
  fStream.Close() Catch myException As Exception 
  ' Show a message box if an error occurs 
  MessageBox.Show(myException.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) 
End Try