Set Spinner value to a TextBox
Private Sub SpinButton1_Change() TextBox1.Text = SpinButton1.Value End Sub