VBの言語仕様上If文のThenは省略可能ということはみなさんご存知でしたか？

次のプログラムは有効にコンパイルできます。

Imports System.Windows



Public Class Test



    Public Shared Sub Main

        Dim x As Integer

        x = InputBox("数字を入力してください。", 0)



        If x Mod 2 = 0

            MsgBox ("偶数ですね")

        Else

            MsgBox ("奇数ですね")

        End If



    End Sub



End Class

このプログラムをコンパイルするには、
①このプログラムをメモ帳で書いて、C:\vb\Test.vbという名前で保存し、
②コマンドプロンプトで以下のコマンドを実行します。
C:\WINNT\Microsoft.NET\Framework\v2.0.50727\vbc.exe C:\vb\Test.vb /TARGET:WINEXE
③C:\vb\Test.exeが作成されるので、ダブルクリック等して実行できます。

パスは環境に合わせて変えて下さい。
たとえば、C:\WINNT は C:\Windows のケースの方が多いと思います。