SWFrm
Swapping
Form1*
Label1
 Swap Values
12345
Label2
 Swap Strings
String One
Second Str$
swCmd
Form_Paint
	EmbossFrm
SWFrm
EmpressFrm
concaveFrm
ConcaveCtl
swCmd_Click
MsgSent
SwapI
SwapStr
Form_Paint
swCmd_Click
 Message sent flag - don't wanna bug user
make sure SwapValue 1 is INT
 compare to simple value in case there is a decimald
 use WIN's MessageBox to note restrictions
We are only doing INTEGER Swaps here   '["
WGlib"
 Set flag so second test msg is not redundant
 same thing for second value
We are only doing INTEGER Swaps here   '["
WGlib"
 swap values, restore to text box control'
assign test to string vars
 swap and restore to .Text propertyo