كلمة Overloads تتيح لنا كتابة اجراء (ٍsub) أو دالة (Function) لها نفس الأسم مع اختلاف الوسائط ، مثلاَ :
Public Class clsOverLoads
Public Overloads Sub Input(ByVal A As String)
Debug.Print("String")
End Sub
Public Overloads Sub input(ByVal A As Integer)
Debug.Print("Integer")
End Sub
Public Overloads Sub input()
Debug.Print("Nothing")
End Sub
End Class
Dim cls As New clsOverLoads
cls.input("بسم الله")
cls.input(5)
cls.input()ستكون النتيجة
String Integer Nothing
الأن نستطيع كتابة نفس الفئة بدون استخدام الكلمة OverLoads تؤدي الى نفس النتائج
Public Class clsOverLoads
Public Sub Input(ByVal A As String)
Debug.Print("String")
End Sub
Public Sub input(ByVal A As Integer)
Debug.Print("Integer")
End Sub
Public Sub input()
Debug.Print("Nothing")
End Sub
end classوالسؤال الأن متى اكون مجبر على استخدام الكلمة OverLoads ؟
