这个倒计时程序从键盘输入数字然后hscroll随着时间改变而改变到直到零时hscroll回到最左边怎么编

@初音✨七奈

提示：本程序无需使用变量，令HScroll1.Max等于你输入的时间秒数，然后HScroll1.Value从HScroll1.Max开始逐渐减少，直到减少到0时停止计时器即可

假设，你的a是一个窗体级（模块级）变量。
在窗体初始化的时候，你要设定滚动条min为0。
①在你的指定a值以后，要锁定一些按钮，防止弄乱。
②在你指定a值以后，要把滚动条的max设为a，让滚动条的比例更直观。同时将滚动条的值也设为a
③在你指定a值以后，给标签写数是对的。但可以放到滚动条变化事件里，避免多处书写。
④滚动条发生变化，这时候，你不应该重新设定滚动条的值。这就构成死循环了！
⑤在计时器事件里a-1；然后再次将滚动条的值也设为a，a为0则停止计时器使用
这样一切都OK

写一下代码

'“设置”按钮
HScroll1.Max = Val(InputBox(""))
HScroll1.Value = HScroll1.Max
Label1.Caption = HScroll1.Value
'“开始”按钮
Timer1.Enabled = True
'“停止”按钮
Timer1.Enabled = False
'定时器控件
HScroll1.Value = HScroll1.Value - 1
Label1.Caption = HScroll1.Value
If HScroll1.Value = 0 Then Timer1.Enabled = False