using System;

static class Extension {
  public static string ToHexString(this uint val, bool upperCase)
  {
    if (upperCase)
      // 大文字で16進形式の文字列にする
      return val.ToString("X");
    else
      // 小文字で16進形式の文字列にする
      return val.ToString("x");
  }
}

class Sample {
  static void Main()
  {
    uint val = 3735928495;

    Console.WriteLine(val.ToHexString(true));
    Console.WriteLine(val.ToHexString(false));
  }
}

Imports System

Module Extension
  <System.Runtime.CompilerServices.Extension> _
  Public Function ToHexString(ByVal val As UInteger, ByVal upperCase As Boolean) As String
    If upperCase Then
      ' 大文字で16進形式の文字列にする
      Return val.ToString("X")
    Else
      ' 小文字で16進形式の文字列にする
      Return val.ToString("x")
    End If
  End Function
End Module

Class Sample
  Shared Sub Main()
    Dim val As UInteger = 3735928495

    Console.WriteLine(val.ToHexString(True))
    Console.WriteLine(val.ToHexString(False))
  End Sub
End Class

using System;

using MyNamespace; // 拡張メソッドを使用するには宣言されている名前空間をインポートする

namespace MyApplication {
  class Sample {
    static void Main()
    {
      string val = "3";

      int x = val.ToInt32();
      int y = "42".ToInt32();
    }
  }
}

namespace MyNamespace {
  static class Extension {
    // 拡張メソッド
    public static int ToInt32(this string val)
    {
      return int.Parse(val);
    }
  }
}

Imports System

Imports MyNamespace ' 拡張メソッドを使用するには宣言されている名前空間をインポートする

Namespace MyApplication
  Class Sample
    Shared Sub Main()
      Dim val As String = "3"

      Dim x As Integer = val.ToInt32()
      Dim y As Integer = "42".ToInt32()
    End Sub
  End Class
End Namespace

Namespace MyNamespace
  Module Extension
    ' 拡張メソッド
    <System.Runtime.CompilerServices.Extension> _
    Public Function ToInt32(ByVal val As String) As Integer
      Return Integer.Parse(val)
    End Function
  End Module
End Namespace

using System;

static class Extension {
  public static string Quote(this string val)
  {
    return string.Concat("\"", val, "\"");
  }
}

class Sample {
  static void Main()
  {
    string x = "Hello, world!";
    string y = null;

    Console.WriteLine(x.Quote());
    Console.WriteLine(y.Quote());
    Console.WriteLine(((string)null).Quote());

    // 上記の拡張メソッド呼び出しは、以下の静的メソッド呼び出しと同じなので
    // いずれもヌル参照とはならない
    //Console.WriteLine(Extension.Quote(x));
    //Console.WriteLine(Extension.Quote(y));
    //Console.WriteLine(Extension.Quote((string)null));
  }
}

Imports System

Module Extension
  <System.Runtime.CompilerServices.Extension> _
  Public Function Quote(ByVal val As String) As String
    Return String.Concat("""", val, """")
  End Function
End Module

Class Sample
  Shared Sub Main()
    Dim x As String = "Hello, world!"
    Dim y As String = Nothing

    Console.WriteLine(x.Quote())
    Console.WriteLine(y.Quote())
    Console.WriteLine(CType(Nothing, String).Quote())

    ' 上記の拡張メソッド呼び出しは、以下の静的メソッド呼び出しと同じなので
    ' いずれもヌル参照とはならない
    'Console.WriteLine(Extension.Quote(x))
    'Console.WriteLine(Extension.Quote(y))
    'Console.WriteLine(Extension.Quote(CType(Nothing, String)))
  End Sub
End Class

using System;

class Account {
  public string DisplayName;
  private int _id;

  public Account(int id, string displayName)
  {
    this._id = id;
    this.DisplayName = displayName;
  }
}

static class Extension {
  public static int GetID(this Account account)
  {
    // 拡張メソッド内からクラスの非公開メンバにアクセスすることはできない
    return account._id;
    // error CS0122: `Account._id' はアクセスできない保護レベルになっています。
  }
}

class Sample {
  static void Main()
  {
    var a = new Account(0, "Alice");

    Console.WriteLine(a.GetID());
  }
}

Imports System

Class Account
  Public DisplayName As String
  Private _id As Integer

  Public Sub New(ByVal id As Integer, ByVal displayName As String)
    Me._id = id
    Me.DisplayName = DisplayName
  End Sub
End Class

Module Extension
  <System.Runtime.CompilerServices.Extension> _
  Public Function GetID(ByVal account As Account) As Integer
    ' 拡張メソッド内からクラスの非公開メンバにアクセスすることはできない
    Return account._id
    ' error BC30390: 'Account._id' は 'Private' であるため、このコンテキストではアクセスできません。
  End Function
End Module

Class Sample
  Shared Sub Main()
    Dim a As New Account(0, "Alice")

    Console.WriteLine(a.GetID())
  End Sub
End Class

using System;
using System.Collections.Generic;

static class Extension {
  // Listクラスに存在するメソッドと同名の拡張メソッド
  public static void Add<T>(this List<T> list, T item)
  {
    Console.WriteLine("extension method!");
  }
}

class Sample {
  static void Main()
  {
    var list = new List<int>();

    list.Add(0); // 拡張メソッドではなくListクラスのAddメソッドが呼び出される

    Console.WriteLine("added!");

    Extension.Add(list, 0); // 静的メソッドとして呼び出すことはできる
  }
}

Imports System
Imports System.Collections.Generic

Module Extension
  '  Listクラスに存在するメソッドと同名の拡張メソッド
  <System.Runtime.CompilerServices.Extension> _
  Public Sub Add(Of T)(ByVal list As List(Of T), ByVal item As T)
    Console.WriteLine("extension method!")
  End Sub
End Module

Class Sample
  Shared Sub Main()
    Dim list As New List(Of Integer)()

    list.Add(0) ' 拡張メソッドではなくListクラスのAddメソッドが呼び出される

    Console.WriteLine("added!")

    Extension.Add(list, 0) ' 静的メソッドとして呼び出すことはできる
  End Sub
End Class