VB では 16進数リテラルとして &H、8進数リテラルとして &O があるのですが、2進数リテラルがありません。MSX-BASIC だと &B というのがあったのですが… (ぐぐると LotusScript にも &B があるらしい)

　リテラルはないですが、2進数表現で入力したいとき、2進数表現で表示したい時などは、以下の方法で行うことができます。

Sub Main()
    ' 二進表現 入力
    Dim a = Convert.ToInt32("00100101", 2)

    ' 二進表現 出力
    Dim b = Convert.ToString(a, 2)

    ' 確認
    Console.WriteLine("{0} {1}", a, b)
End Sub

　結果

37 100101
続行するには何かキーを押してください . . .