Imports System
Imports System.Reflection
public class compiler
  shared function Main as integer
 
    dim d As MethodInfo 
    dim tp As Type = Type.GetType("Mono.Runtime")
    if not tp is nothing then
        d = tp.GetMethod("GetDisplayName", BindingFlags.NonPublic or BindingFlags.Static) 
        if not d is nothing then                   
            Console.WriteLine(d.Invoke(nothing, nothing))
        End if
    end if
 
    return 0
  End function
end class
 

SW1wb3J0cyBTeXN0ZW0KSW1wb3J0cyBTeXN0ZW0uUmVmbGVjdGlvbgpwdWJsaWMgY2xhc3MgY29tcGlsZXIKICBzaGFyZWQgZnVuY3Rpb24gTWFpbiBhcyBpbnRlZ2VyCiAgICAKICAgIGRpbSBkIEFzIE1ldGhvZEluZm8gCiAgICBkaW0gdHAgQXMgVHlwZSA9IFR5cGUuR2V0VHlwZSgiTW9uby5SdW50aW1lIikKICAgIGlmIG5vdCB0cCBpcyBub3RoaW5nIHRoZW4KICAgICAgICBkID0gdHAuR2V0TWV0aG9kKCJHZXREaXNwbGF5TmFtZSIsIEJpbmRpbmdGbGFncy5Ob25QdWJsaWMgb3IgQmluZGluZ0ZsYWdzLlN0YXRpYykgCiAgICAgICAgaWYgbm90IGQgaXMgbm90aGluZyB0aGVuICAgICAgICAgICAgICAgICAgIAogICAgICAgICAgICBDb25zb2xlLldyaXRlTGluZShkLkludm9rZShub3RoaW5nLCBub3RoaW5nKSkKICAgICAgICBFbmQgaWYKICAgIGVuZCBpZgogICAgCiAgICByZXR1cm4gMAogIEVuZCBmdW5jdGlvbgplbmQgY2xhc3MK

5Y+C6ICDCmh0dHA6Ly9zdGFja292ZXJmbG93LmNvbS9xdWVzdGlvbnMvNDE3ODEyOS9ob3ctdG8tZGV0ZXJtaW5lLXRoZS1yZXZpc2lvbi1mcm9tLXdoaWNoLWN1cnJlbnQtbW9uby1ydW50aW1lLXdhcy1idWlsdC1hbmQtaW5zdA==

参考
http://stackoverflow.com/questions/4178129/how-to-determine-the-revision-from-which-current-mono-runtime-was-built-and-inst