精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● VB和Basic>>〓〓..技术文章连载..〓〓>>Visual Basic.NET>>(转)从 Visual Basic 6.0 到 Visual Basic.NET 的转换 3

主题:(转)从 Visual Basic 6.0 到 Visual Basic.NET 的转换 3
发信人: pack27()
整理人: gzwsh(2001-05-12 23:02:06), 站内信件
Implements
Visual 
Basic 6.0 Implements 语句指定在其出现的类模块中实现的接口或类。

 
 


Visual Basic.NET
 

Visual Basic.NET 中的 Implements 与 Visual Basic 6.0 中的 Implements 有两个本质区别:

在 Implements 语句中不能指定类。 
每一种实现方法均要求在方法声明语句的结束处使用 Implements 子句。该子句指定其实现的接口方法。 
由于要求每一种实现接口方法的方法均使用 Implements 子句,所以提高了代码的可读性;在阅读使用方法来实现接口方法的的代码时,这一优点显而易见。
 


升级
向导
 

如果类 a 实现类 b,则将为类 b 声明接口,且类 a 将变为实现类 b 的接口:

Interface _b
      Function MyFunction() As String
  End Interface
  Class a
      Implements _b
      Function b_MyFunction() As String Implements _b.MyFunction
  End Function
  End Class
 

属性
Visual 
Basic 6.0 在 Visual Basic 6.0 中,特定属性的 Get、Let 和 Set 属性函数可以通过不同级别的访问选项声明。例如,Property Get 函数可以声明为 Public 而 Property Let 可以声明为 Friend。
 


Visual Basic.NET
 

属性的 Get 和 Set 函数必须具有相同级别的访问选项。这样就便于 Visual Basic.NET 与其他 .NET 语言协同操作。
 


升级
向导
 

如果访问选项的级别不同,则新属性为 Public。
 

默认属性
Visual 
Basic 6.0 任何成员均可标记为类的默认值。
 


Visual Basic.NET
 

只有接受参数的属性可以标记为默认值。对于将成为集合中的索引的带参数属性,这一情况很常见。

这使得代码的可读性更强,因为对没有成员的对象变量的引用通常指向对象自身,而不是指向上下文中的对象和其他上下文中的默认属性。例如,语句 Call Display(TextBox1) 可能是将文本框实例传递给 Display 函数,也可能是传递文本框的内容。

此外,删除这种二义性避免了使用单独的语句执行引用赋值。赋值 x = y 总是意味着将变量 y 的内容赋值给变量 x,而不是将 y 引用的对象的默认属性赋值给 x 引用的对象的默认属性。
 


升级
向导
 

尽可能解析默认属性。无法解析时(延迟绑定对象)将添加错误注释。
 

枚举
Visual 
Basic 6.0 枚举常数可以无限定地被引用。
 


Visual Basic.NET
 

如果在文件或项目级别为枚举添加了 Import,则枚举常数可以无限定引用。

这样可以与类、结构和接口保持一致,在类、结构和接口中,可以给成员赋予通用名称,而不必担心与其他成员冲突。例如,Color 枚举和 Fruit 枚举均可以包含名称为 Orange 的常数。在 Visual Basic 6.0 中的规则是,为枚举常数加上前缀使每个常数保持唯一。这使常数名称非常累赘,如 MsColorOrange 和 MsFruitOrange。
 


升级
向导
 

对枚举的引用将变为完全限定。
 

While
Visual 
Basic 6.0 While 语句以 WEnd 语句结束。
 


Visual Basic.NET
 

为了与其他块结构保持一致,While 的结束语句变为 End While。这提高了语言的一致性和可读性。
 


升级
向导
 

将 WEnd 语句变为 End While。
 

On...GoTo 和 On...GoSub
Visual 
Basic 6.0  根据表达式的值,On expression GoTo destinationlist 和 On expression GoSub destinationlist 语句使程序转向目标列表中的若干个指定行之一。
 


Visual Basic.NET
 

On...GoTo 和 On...GoSub 是非结构化的编程构造。它们的使用让程序更加难以阅读和理解。Select Case 可以提供一种更加结构化和灵活的方法来执行多个分支。

注意:仍然支持 On Error GoTo。
 


升级
向导
 

以下示例:

On MyVariable GoTo 100,200,300
将标记有升级错误:

' UPGRADE_ISSUE On MyVariable GoTo was not upgraded
  On MyVariable GoTo 100,200,300
您应当重写代码以避免使用这样的语句,例如:

On x Goto 100,200,300
可以重写为:

Select Case x
      Case 1: '插入第 100 行的代码
      Case 2: '插入第 200 行的代码
      Case 3: '插入第 300 行的代码
  End Select
 

GoSub...Return
Visual 
Basic 6.0 GoSub line...Return 语句在过程中分支到子例程,然后从子例程返回。
 


Visual Basic.NET
 

GoSub...Return 是非结构化编程构造。它的使用让程序更加难以阅读和理解。一个更加结构化的替代方案是:创建可以调用的独立过程。
 


升级
向导
 

与 On...GoTo 相同,这些语句均标记有升级错误。
 

LSet
Visual 
Basic 6.0 LSet 用空格填充字符串使其为指定长度,或者将用户定义类型的变量复制到另一个用户定义类型的变量。
 


Visual Basic.NET
 

不支持 LSet 语句。LSet 对类型而言很不安全,因此会在运行时导致错误。此外,由于它对类型而言不安全,因此执行时代码必须完全可靠。删除 LSet 语句后无法将一个结构复制到另一个结构;但是,可以修改 Visual Basic.NET 代码,使用 RtlCopyMemory 来获得相同的效果。
 


升级
向导
 

语句:

LSet a1 = a2
将标记有升级错误

' UPGRADE_ISSUE: LSet cannot assign a UDT from one type to another
  LSet a1 = a2
 

VarPtr、StrPtr 和 ObjPtr
Visual 
Basic 6.0  VarPtr、StrPtr 和 ObjPtr 以整数形式返回变量的地址,然后将此地址传递到使用地址的 API 函数(例如 RtlCopyMemory)。VarPtr 返回变量的地址,StrPtr 返回字符串的地址,ObjPtr 返回对象的地址。这些函数均未记录在文档中。
 


Visual Basic.NET
 

可以检索数据项的地址,但是检索必须通过调用 CLR 才能进行。这是因为 CLR 通常可以在内存中自由移动项目,因此需要让 CLR 知道何时在使用地址,不能移动项目。以下示例检索对象的地址:

Dim MyGCHandle As GCHandle = GCHandle.Alloc(o,GCHandleType.Pinned)
Dim Address As Integer = CInt(MyGCHandle.AddrOfPinnedObject())
'... 
MyGCHandle.Free() '再次允许移动对象实例
允许运行时移动数据项目能够改善运行时的性能。
 


升级
向导
 

这些语句不会自动升级,因此将标记有“(statement) is not supported”[(语句)不被支持] 的升级错误。例如,以下代码:

a = VarPtr(b)
升级后将变为:

' UPGRADE_ISSUE: Function VarPtr() is not supported
  a = VarPtr(b)
这也会导致编译错误。
 

文件 I/O
Visual 
Basic 6.0 语言中包括文件 I/O 语句。
 


Visual Basic.NET
 

通过类库使用文件 I/O 操作。从语言中删除文件 I/O 语句以便在 Visual Basic.NET 中使用不同的 I/O 库。如果语言中存在文件 I/O 语句,将会使代码更加累赘,标识符 Open、Close、Print 和 Write 将成为保留字。
 


升级
向导
 

文件 I/O 语句将升级为相应的函数。例如,以下代码:

Open nput )
 

Debug.Print
Visual 
Basic 6.0  Debug.Print 将一行文字输出到“立即”窗口。
 


Visual Basic.NET
 


Debug.WriteLine 将一行文字输出到“输出”窗口。还可以使用 Debug.Write 方法将文字输出到“输出”窗口,并且没有换行符。
 


升级
向导
 

Debug.Print 升级为 Debug.WriteLine。
 

资源文件
Visual 
Basic 6.0 Visual Basic 6.0 支持每个工程使用一个 .res 文件。
 


Visual Basic.NET
 

Visual Basic.NET 支持多种资源文件。可以绑定窗体以自动从新的 .resX 格式资源文件中检索资源。任何 CLR 类均可存储在 .resX 文件中。
 


升级
向导
 

文件由 .res 升级为 .resX,并且代码被修改以便从 .resX 文件中加载。
 



----
我以为爱满溢
将我们分隔的不会是距离
走远方 到异地
我们却慢慢的失去连系
我常常想起你念着你吶喊你
不知道远方的你是否感应
我知道我们不会再相遇
回忆就是一生最美的权利
......
  

[关闭][返回]