Mega Code Archive

 

Categories / VisualBasic Script / Forms

 

Set the SpinButton MinMax and current value

Private Sub UserForm_Initialize()     With SpinButton1         .Min = 1         .Max = 100         Label1.Caption = "Specify a value between " & .Min & " and " & .Max & ":" '       Initialize Spinner         .Value = 1 '       Initialize TextBox         TextBox1.Text = .Value     End With End Sub