だらだらやるよ。

こげつのIT技術メモ

ゆの in VB.NET

ゆの in language もいっこ。VBの人気のなさが面白かったのでうっかり。
コードはhttp://subtech.g.hatena.ne.jp/mayuki/20080708/1215580273のまるぱくり。ごめんなさい。
VB.NET 2005で動作確認。

Module Yuno
    Sub Main()
        Dim yuno = _
        X / __ / X < 来週も見てくださいね
    End Sub

    Class xx
        Shared Operator /(ByVal a As xx, ByVal b As xx) As xx
            Return b
        End Operator
        Shared Operator /(ByVal a As xx, ByVal b As Integer) As xx
            Console.Write("ひだまりスケッチ")
            Dim s As String = a.GetType().Name(0)
            Console.Write(s)
            Console.Write(b.ToString())
            Return a
        End Operator
        Shared Operator <(ByVal a As xx, ByVal b As String) As Integer
            Console.Write(b)
            Return 0
        End Operator
        Shared Operator >(ByVal a As xx, ByVal b As String) As Integer
            Console.Write(b)
            Return 0
        End Operator
    End Class

    Dim X As New xx
    Dim __ As Integer = 365
    Dim 来週も見てくださいね As String = "来週も見てくださいね"

End Module

VBはアンダーバーが変数名とかに使えないぽいので、アンダーバー2個つなげてます。
多分アンダーバーはあれだ、改行に使うからだ。