[VB6/VBA/twinBASIC] The quickest way to the real Windows version: KUSER_SHARED_DATA

[wqweto]

After seeing this, people will expect that this code will work in Windows 98 and will be extremely disappointed when they realize that this is not the case.

Btw, disappointment is the "correct" feeling to have when dealing with Win9x :-))

An appropiate usage pattern here is first to check OsVersion and only if OsVersion >= Win8 then to check RealOsVersion.

Anyway, once again -- "No good deed remains unpunished" proverb has been proven. I'm not the original author of the snippet but I was just sharing my usage on an "it works for me" basis.

I don't care about 9x and if I did I would wrap RealOsVersion with necessary checks to return OsVersion instead. Do you want me to publicly appologize now for including Win98 in the enumeration or something?

I cannot remove this entry from the larger codebase it was taken from as the code is littered with hundereds of (now obsolete) Win9x checks and there is no one to refactor this just to not confuse anyone when pasted on VBForums.

Anyway, you and anyone dealing with 9x will have to "bite" their disappointment and get used to copy/pasting not working snippets from here. . . ¯\_(?)_/¯

cheers,
</wqw>