Visual Basic .NET e Visual C# provê um ambiente repleto de conceitos de programação orientada a objetos, incluíndo classes abstratas, interfaces e membros de classes overloading ou overriding. Estes conceitos são fundamentais para a linguagem e são usadas por todo Microsoft .NET Framework.

' Project name: WebAppsVB

    Public Module Strings

        Public Function Sort(ByVal strText As String, _

            Optional ByVal bAlphaOrder As Boolean = True) As String

            ' Declare and initialize a string array.

            Dim strArray As String() = {""}

            ' Convert the string to an array using System.String.

            strArray = strText.Split(" ")

            ' Use System.Array to sort.

            System.Array.Sort(strArray)

            ' If it's not alphabetic order, reverse the array.

            If Not bAlphaOrder Then

                ' Use System.Array to reverse.

                System.Array.Reverse(strArray)

            End If

            ' Return the a string.

            Sort = System.String.Join(" ", strArray)

        End Function

    End Module

// Project name: WebAppsCS

{    class Strings

    {

        // Takes a string, sorts it, and returns a string.

        public static string Sort(string strText , bool bAlphaOrder)

        {

            // Declare and initialize a string array.

            string[] strArray = {""};

            char[] strSep = {' '};

            //  Convert the string to an array using System.String.

            strArray = strText.Split(strSep);

            // Use System.Array to sort.

            System.Array.Sort(strArray);

            //  If it's not alphabetic order, reverse the array.

            if (!bAlphaOrder)

            {

                // Use System.Array to reverse.

                System.Array.Reverse(strArray);

            }

            // Return the string.

            return System.String.Join(" ", strArray);

        }

        // Same method with one parameter.

        public static string Sort(string strText)

        {

            return Sort(strText, true);

        }        

    }

Friend Class Translator

    Private mstrText As String

    ' Controls access to the class-level

    ' variables.

    Public Property Text() As String

        Get

            Text = mstrText

        End Get

        Set(ByVal Value As String)

            mstrText = Value

        End Set

    End Property

    ' Translates the value in the Text property.

    Public Sub Translate()

        Dim strWord As String, intCount As Integer

        Dim arrWords() As String

        Dim bCaps As Boolean

        ' Convert the string to an array using System.String.

        arrWords = mstrText.Split(" ")

        For intCount = 0 To UBound(arrWords)

            ' Check if word is capitalized.

            If LCase(arrWords(intCount)) <> arrWords(intCount) Then

                bCaps = True

                arrWords(intCount) = LCase(arrWords(intCount))

            End If

            strWord = arrWords(intCount)

            ' Do translation.

            If strWord <> "" Then

                strWord = Right(strWord, Len(strWord) -  1) & _

                  Left(strWord, 1) & "ay"

                ' Recapitalize if necessary

                If bCaps Then

                    strWord = UCase(Left(strWord, 1)) & _

                      Right(strWord, Len(strWord) - 1)

                End If

            End If

            ' Store back in the array.

            arrWords(intCount) = strWord

            ' Reset caps flag.

            bCaps = False

        Next

        ' Rebuild string from array.

        mstrText = String.Join(" ", arrWords)

    End Sub

internal class Translator

{

        string mstrText;

        // Controls access to class-level variables.

        public string Text

        {

            get

            {

                return mstrText;

            }

            set

            {

                mstrText = value;

            }

        }

        // Translates the value in the Text property. 

        public void Translate()

        {

            string strWord;

            string[] arrWords;

            bool bCaps = false;

            //  Convert the string into an array using System.String.

            arrWords = mstrText.Split(' ');

            for(int intCount = 0; intCount <= arrWords.GetUpperBound(0); 

                 intCount++)

            {

                // Change to lowercase.

                strWord = arrWords[intCount].ToLower();

                // Check if word is capitalized.

                if(!arrWords[intCount].Equals(strWord))

                    bCaps = true;

                // Do translation.

                if(strWord != "")

                {

                    strWord = strWord.Substring(1,strWord.Length - 1) +

                      strWord.Substring(0,1) + "ay";

                    // Recapitalize if necessary.

                    if(bCaps)

                        strWord = strWord.Substring(0,1).ToUpper() +

                          strWord.Substring(1, strWord.Length - 1);

                }

                // Store the word back in the array.

                arrWords[intCount] = strWord;

                // Reset the caps flag.

                bCaps = false;

            }

            // Rebuild the string from the array.

            mstrText = String.Join(" ", arrWords);

        }

Private Sub butTranslate_Click(ByVal sender As System.Object , _

  ByVal e As System.EventArgs) Handles butTranslate.Click

     ' Create a new Translator object.

    ' Put the source text into the translator.

    TranslateText.Text = txtInput.Text    ' Turn the crank.

    ' Display result.

End Sub

private void butTranslate_Click(object sender, System.EventArgs e)

{

    // Create a new Translator object.

    // Put the source text into translator.

    // Turn the crank.

    // Display the result.

}

Public Class DerivedClass

    Inherits BaseClass

End Class

public class DerivedClass : BaseClass

{

}

' Definition of abstract class.

Public MustInherit Class Shape

    Public MustOverride Property Top() As Single

    Public MustOverride Property Left() As Single

    Public MustOverride Function Area() As Single

    Public MustOverride Function Perimeter() As Single

End Class

// Definition of abstract class.

public abstract class Shape

{

    public Shape()

    {

    }

    public abstract float Top

    {

        get;

        set;

    }

    public abstract float Left

    {

        get;

        set;

    }

    public abstract float Area();

    public abstract float Perimeter();

}

    Delegate Function MathDelegate(ByVal x As Integer) As Boolean

    delegate bool MathDelegate(int x);

' Interface for all shapes.

Public Interface IFigure

    Property Top() As Single

    Property Left() As Single

    Function Area() As Single

    Function Perimeter() As Single

End Interface

// Interface for all shapes.

public interface IFigure

{

    float Top

    {

        get;

        set;

    }

        float Left

    {

        get;

        set;

    }

        float Area();

        float Perimeter();

}

 Definition of abstract class.

Public MustInherit Class Shape

    Public MustOverride Property Top() As Single Implements IFigure.Top

    Public MustOverride Property Left() As Single Implements  IFigure.Left

    Public MustOverride Function Area() As Single Implements  IFigure.Area

    Public MustOverride Function Perimeter() As Single Implements _ 

       IFigure.Perimeter

End Class

public abstract class Shape : IFigure

{

    // Constructor

    public Shape()

    {

    }

    public abstract float Top

    {

        get;

        set;

    }

        public abstract float Left

    {

        get;

        set;

    }

    public abstract float Area();

    public abstract float Perimeter();

}