I'd like to print an unshaded box similar to BOX_TYPE_UP_FRAME, but with the frame on all sides.  I printed the code below from SBasic Commands to view all available boxes but I can't seem to find/figure out how to get just a plain unfilled box with a dark frame/border.  Also, is it possible to change the width of the border for the box?

Thanks.


Var vLoop as Int
Var vLoopto as Int
Var vCnt as Int
Var vDown as int

     vLoop = 0
     vLoopto = 33
     vCnt = 0
     NewPage(850, 1100)
     While VLoop < vLoopTo
     {
           vLoop = vLoop + 1
           vCnt = vCnt + 1  
           PrintBox(vLoop, (vCnt * 100) + 75, (vDown * 100) + 75, 100, 100)
           PrintString(@Str(vLoop), (vCnt * 100) + 112, (vDown * 100) + 110, 0, "BArial", 24, 0)
            If vCnt = 6 Then
           {
                  vCnt = 0
                 vDown = vDown + 1
           }
     }
      FinishPage()

Right on the money Ray,

Thank you.

LOL! OK, I won't ask you..

Thank you very much for the explanation.

Brandon