クラスライブラリの作り方と共通言語仕様CLS

using System;

namespace ClassLibrary
{
    // メッセージクラス
    public class MessageClass
    {
        public readonly string Message;

        public MessageClass( string message )
        {
            Message = message;
        }

        public void ShowMessage()
        {
            Console.WriteLine( Message );
        }
    }

    // 自作の0除算例外クラス
    public class OriginalDivideByZeroException : Exception
    {
        public OriginalDivideByZeroException( string message ) : base( message )
        {
        }
    }

    // 計算クラス (全メソッドはstatic)
    public class CalculationClass
    {
        public static int Add( int x, int y )
        {
            return x + y;
        }

        public static int Subtract( int x, int y )
        {
            return x - y;
        }

        public static int Multiply( int x, int y )
        {
            return x * y;
        }

        public static int Divide( int x, int y )
        {
            if ( y == 0 ) throw new OriginalDivideByZeroException( "0で除算しました。" );
            return x / y;
        }
    }

}

Imports ClassLibrary

Module SampleProject

    Sub Main()

        ' MessageClassのインスタンスを作成
        Dim msg As New MessageClass("クラスライブラリからのメッセージ")

        msg.ShowMessage()

        ' CalculationClassクラスの共有メソッドを呼び出し
        Console.WriteLine(CalculationClass.Add(1, 2))
        Console.WriteLine(CalculationClass.Subtract(5, 3))
        Console.WriteLine(CalculationClass.Multiply(3, 4))
        Console.WriteLine(CalculationClass.Divide(6, 2))

        ' 自作例外OriginalDivideByZeroExceptionの捕獲
        Try

            Console.WriteLine(CalculationClass.Divide(1, 0))

        Catch ex As OriginalDivideByZeroException

            Console.WriteLine(ex.Message)

        End Try

    End Sub

End Module

using System;

namespace ClassLibrary
{
    // 計算クラス (全メソッドはstatic、引数はuint)
    public class CalculationClass
    {
        public static uint Add( uint x, uint y )
        {
            return x + y;
        }

        public static uint Subtract( uint x, uint y )
        {
            return x - y;
        }

        public static uint Multiply( uint x, uint y )
        {
            return x * y;
        }

        public static uint Divide( uint x, uint y )
        {
            if ( y == 0 ) throw new OriginalDivideByZeroException( "0で除算しました。" );
            return x / y;
        }
    }

    // 値クラス
    public class ValueClass
    {
        private int m_Value;

        public ValueClass( int val )
        {
            m_Value = val;
        }

        public static ValueClass operator+ ( ValueClass x,  ValueClass y )
        {
            return new ValueClass( x.m_Value + y.m_Value );
        }

        public static ValueClass operator- ( ValueClass x,  ValueClass y )
        {
            return new ValueClass( x.m_Value - y.m_Value );
        }

    }

    // 以下略

' 途中略

' ValueClassのインスタンスを作成
Dim a As New ValueClass(3)
Dim b As New ValueClass(2)

Dim result As ValueClass = a - b

' 以下略

using System;

namespace ClassLibrary
{
    // 計算クラス (全メソッドはstatic、引数はlong)
    public class CalculationClass
    {
        public static long Add( long x, long y )
        {
            return x + y;
        }

        public static long Subtract( long x, long y )
        {
            return x - y;
        }

        public static long Multiply( long x, long y )
        {
            return x * y;
        }

        public static long Divide( long x, long y )
        {
            if ( y == 0 ) throw new OriginalDivideByZeroException( "0で除算しました。" );
            return x / y;
        }
    }

    // 値クラス
    public class ValueClass
    {
        private int m_Value;

        public ValueClass( int val )
        {
            m_Value = val;
        }

        // 加算演算子
        public static ValueClass operator+ ( ValueClass x,  ValueClass y )
        {
            return new ValueClass( x.m_Value + y.m_Value );
        }
        
        // メソッドによる代替
        public ValueClass Add( ValueClass val )
        {
            return new ValueClass( this.m_Value + val.m_Value );
        }

        // 減算演算子
        public static ValueClass operator- ( ValueClass x,  ValueClass y )
        {
            return new ValueClass( x.m_Value - y.m_Value );
        }

        // メソッドによる代替
        public ValueClass Subtract( ValueClass val )
        {
            return new ValueClass( this.m_Value - val.m_Value );
        }

        // ToString()をオーバーライド
        public override string ToString()
        {
            return m_Value.ToString();
        }

    }


    // 以下略

Imports ClassLibrary

Module SampleProject

    Sub Main()

        ' MessageClassのインスタンスを作成
        Dim msg As New MessageClass("クラスライブラリからのメッセージ")

        msg.ShowMessage()

        ' CalculationClassクラスの共有メソッドを呼び出し
        Console.WriteLine(CalculationClass.Add(1L, 2L))
        Console.WriteLine(CalculationClass.Subtract(5L, 3L))
        Console.WriteLine(CalculationClass.Multiply(3L, 4L))
        Console.WriteLine(CalculationClass.Divide(6L, 2L))

        ' 自作例外OriginalDivideByZeroExceptionの捕獲
        Try

            Console.WriteLine(CalculationClass.Divide(1L, 0L))

        Catch ex As OriginalDivideByZeroException

            Console.WriteLine(ex.Message)

        End Try

        ' ValueClassのインスタンスを作成
        Dim a As New ValueClass(3)
        Dim b As New ValueClass(2)

        Dim result As ValueClass = a.Subtract(b)

        Console.WriteLine(result)

        result = a.Add(b)

        Console.WriteLine(result)

    End Sub

End Module

using System;

[assembly: CLSCompliant(true)] // このアセンブリをCLS準拠とする

namespace ClassLibrary
{
    // 計算クラス
    public class CalculationClass
    {

        [CLSCompliant(true)] // このメソッドをCLS準拠とする
        public static long Add( long x, long y )
        {
            return x + y;
        }

        [CLSCompliant(true)] // このメソッドをCLS準拠とする
        public static uint Subtract( uint x, uint y )
        {
            return x - y;
        }

        [CLSCompliant(false)] // このメソッドをCLS非準拠とする
        public static uint Multiply( uint x, uint y )
        {
            return x * y;
        }

        // 属性の指定無し
        public static uint Divide( uint x, uint y )
        {
            if ( y == 0 ) throw new OriginalDivideByZeroException( "0で除算しました。" );
            return x / y;
        }
    }

    // 以下略