下面代码怎么会提示没有可用字段或成员?

Question

高手救一下,下面的代码是我写了代码生成器生成的.对VB只会读,不会检错.所以看不出来是哪有问题了Imports System
Imports System.TextNamespace TestSpace
  
  Public Class HelloWorld
    
    Public Shared Sub Main()
      Dim sbMessage As System.Text.StringBuilder = New System.Text.StringBuilder
      Dim Characters() As Char = New Char() {Global.Microsoft.VisualBasic.ChrW(72), Global.Microsoft.VisualBasic.ChrW(69), Global.Microsoft.VisualBasic.ChrW(76), Global.Microsoft.VisualBasic.ChrW(76), Global.Microsoft.VisualBasic.ChrW(79), Global.Microsoft.VisualBasic.ChrW(32), Global.Microsoft.VisualBasic.ChrW(87), Global.Microsoft.VisualBasic.ChrW(79), Global.Microsoft.VisualBasic.ChrW(82), Global.Microsoft.VisualBasic.ChrW(76)}
      Dim intCharacterIndex As Integer = 0
      Do While intCharacterIndex < Characters.Length
        sbMessage.Append(Characters(intCharacterIndex))
        intCharacterIndex = intCharacterIndex + 1
      Loop
      Console.WriteLine(sbMessage.ToString())
    End Sub
  End Class
End Namespace

Answer 1

用了名空间，是VB.Net代码！可惜没法测试，我正用VB6呢。下次吧！

Answer 2

这段代码是VB.net，不是VB6。作为VB.net代码，这段代码应该是正确的。

Answer 3

解决了,是我用的编译器的选择的问题,我用了CSharpProvider.所以就识别不了.