R highcharter, valuebox, eventreactive didn't work together in shiny

Question

I want to build an app by shinydashboard that work like this:

• textInput
• Submit actionbutton to update value box