Jim,
I couldn't wrap my mind around some of your code.

Particularly this:
$ShortOffset = Len($WINSserver)

just didn't do it for me.

Decided to rework that portion to:

code:
Select
   Case $X <> -1
      $SrchLen = (LEN($WINSarray[$x])-($ShortOffset+1))
      ;$txtIP.text = SubStr($WINSarray[$x],$ShortOffset, $SrchLen )
      $txtIP.text = Split(Split($WINSarray[$x],'Address is (')[1],')')[0] 
   Case $Y <> -1
      $SrchLen = (LEN($WINSarray[$y])-($LongOffset+1))
      ;$txtIP.text = SubStr($WINSarray[$y],$LongOffset, $SrchLen )
      $txtIP.text = Split(Split($WINSarray[$y],'Member is (')[1],')')[0]
   Case 1
      $txtIP.text = "IP Not Found"
EndSelect
Hope you don't mind.

I can't really take credit for it though because I er.. borrowed the Split(Split()) thingy from Lonkero.

Incidentally, my WINS IP is in the format of:
$WINSserver = "11.222.33.44"
_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.