I am glad you have found a solution that works in your particular case. I am real too, I make my living writing programs for the real world. DOS programs started to die ten years ago and no critical applications should rely on such programs any longer - hardware and software support is non-existent; it is a matter of chance whether they can be made to run now and there are absolutely no guarantees for the future (i.e. next week). Development of an alternative to the DOS app should have started at least five years ago. Whatever may be said against Windows there has never been a more universal, stable and consistent operating system on which to develop software for all sorts of applications. To speak of it as a "whim" and "the latest craze" is dangerously short-sighted, especially if people's limbs are at risk! Phil The opinions expressed in this post are not necessarily those of the author, especially if you find them impolite, inaccurate or inflammatory.

Dim Number As Integer = ??? Dim Temp As Integer = 1 Do Until Temp > Number Temp <<= 1 Loop While Temp > 0 If Number < Temp Then Return False Else Number -= Temp End If Temp >>= 1 End While Return True ...Unless there is a simpler way to convert an integer to binary I think the original way was faster Pablo Sometimes I think there's no reason to get out of bed . . . then I feel wet, and I realize there is.