Text1.Text = "7"
Text1.Text = 7
在这两个调用中，Text1中的text都将被设为字符串“7”。这就是重载调用，因为Visual Basic知道如何处理输入的不同的数据类型。它把它们作为变量处理，并自动进行转化。当你调用一些参数类型有明确定义的函数时，Visual Basic也会作同样的转化。下面的两个函数调用：
a = SetVal("This")
a = SetVal(7)
都可以正确调用以下函数：
Function SetVal(x As String)
Form1.Text1.Text = x End Function
既然Visual Basic已经可以传送多种不同的变量类型，为什么还需要重载功能呢？这是因为虽然目前单独的一个函数已经可以处理多种数据类型，它不能根据传入的不同的数据类型产生不同的动作。相反的，比较以下两个函数：
Function GetCustomerID(custname as string) As Integer
' Look up customer ID based on customer name
End Function
Function GetCustomerID(purch as long) As Integer
' Look up customer ID based on purchase order
End Function
通过重载，你可以根据输入的数据类型来实现函数。这对于下一个版本的Visual Basic是很重要的，因为它具有一个新的特性――缺省数据类型保护。一般来说变量的自动转换是有利的，但可以想到有时也会给你带来麻烦。例如在前面的SetVal的例子中，如果你要传送的是字符7而不是字符串“7”，那会发生什么情况呢？下一个版本的Visual Basic将会自动捕获这个错误。（如果你的代码是基于Visual Basic以前的无类型识别的功能，这个特性会被禁用）
|
