Question

请教一个VBA关于spinbutton的最最简单的问题

有一个Textbook1文本框，有一个Spinbuttion1微调框，我希望按一下微调框的向上箭头，文本框内的数值加1，我这样写为什么会错？谢谢大家。

Private Sub SpinButton1_SpinUp()
Textbook1.Value = Textbook1.Value + 1
End Sub

把Textbook1.Value = Textbook1.Value + 1改成Textbook1.Text = DateValue(Textbook1.Text )+ 1也不对。

Answer 1

Private Sub SpinButton1_SpinUp()
TextBox1.Text = TextBox1.Text + 1
End Sub

Private Sub SpinButton1_SpinDown()
TextBox1.Text = TextBox1.Text - 1
End Sub
一个是递增 一个是递减
你更改的是数据类型不对 ,DateValue(Textbook1.Text ) 这句你转成日期当然不对了。