If OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  SpinGadget(1,10,10,100,20,0,0,#PB_Spin_Numeric)
  
  SendMessage_(FindWindowEx_(WindowID(0),GadgetID(1),0,0),#UDM_SETRANGE32,-65535,65535)
  SetGadgetState(1,0)
  SetGadgetText(1,"0")
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf