using System;
public class NamedPointTest
{
public static void Main()
{
NamedPoint tNamedPoint = new NamedPoint("first", 100, 200);
Console.WriteLine(tNamedPoint);
Point tPoint = tNamedPoint;
Console.WriteLine(tPoint);
}
}
Public Class Point
Private iX As Integer
Private iY As Integer
Public Sub New(ByVal pX As Integer, ByVal pY As Integer)
iX = pX
iY = pY
End Sub
Public Overrides Function ToString() As String
Return iX & ":" & iY
End Function
End Class
Module PointTest
Sub Main()
Dim tPoint As Point = New Point(100, 200)
Console.WriteLine(tPoint)
Dim tAnotherPoint As Point = tPoint
Console.WriteLine(tAnotherPoint)
End Sub
End Module
Public Class NamedPoint
Inherits Point
Private iName As String
Public Sub New(ByVal pName As String, ByVal pX As Integer, ByVal pY As Integer)
MyBase.New(pX, pY)
iName = pName
End Sub
Public Overrides Function ToString() As String
Return iName & "%" & MyBase.ToString()
End Function
End Class
Module NamedPointTest
Sub Main()
Dim tNamedPoint As NamedPoint = new NamedPoint("first", 100, 200)
Console.WriteLine(tNamedPoint)
Dim tPoint As Point = tNamedPoint
Console.WriteLine(tPoint)
End Sub
End Module
We have now provided 4 classes in C#:
If it were necessary, a mix of .NET languages could be used. For example, we could use a NamedPointTest class coded in C# with a NamedPoint class coded in VB.NET and a Point class coded in C#.