Ah, that'll be the problem - Rnd2 will never return 'high'. Why not write a TestRnd2 function which does, say, 1,000,000 calls and checks the distribution of the results.
Some other observations:
* You haven't used Option Explicit - it's a complete no-brainer to use Option Explicit in every...