[Abu Ehab]

شــــــوف :
هو الكود منطـــــــــــقيا ســــــــليم
لكن لازم تعرف أنه : من أهم قوانين تعريف الكائنات وحتى المتغيرات هو لا يجوز أن يبدأ برقم مثل ما أنت عامل ...

المهم :
عدل أسماء الكلاسات كالتالي :

PHP كود :

Public Class Person

    Public Name As String
    Public Function Calculate(ByVal Items1 As Double, ByVal Items2 As Double) As Double
        Return (Items1 + Items2)
    End Function

    Public Function Calculate(ByVal Items1 As Double, ByVal Items2 As Double, ByVal Items3 As Double) As Double
        Return (Items1 + Items2 + items3)
    End Function
End Class 


PHP كود :

Public Class _1Customer
    Inherits Person
End Class 


PHP كود :

Public Class _2Customer
    Inherits Person
    Public Num As String
End Class 


PHP كود :

Public Class Form1
    Dim OBJCus1 As New _1Customer
    Dim OBJCus2 As New _2Customer



    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim I1, I2, I3 As Double
        I1 = 12 : I2 = 13
        List1.Items.Add(OBJCus1.Calculate(I1, I2))

    End Sub

   
End Class