Non-filled rect?

here's one from the bpaint sample

Function DrawBox(x#,y#,w#,h#)
	DrawRect x,y,w,1
	DrawRect x,y+h-1,w,1
	DrawRect x,y+1,1,h-2
	DrawRect x+w-1,y+1,1,h-2
End Function