在窗体上画一个名称为Label1的标签,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100.程序运行后,如果移动滚动框,则在标签中显示滚动条的当前值.以下能实现上述操作的程序段是（）

A、PrivateSubHScroll_Change()Label1.Caption=HScroll1.ValueEndSub

B、PrivateSubHScroll_Click()Label1.Caption=HScroll1.ValueEndSub

C、PrivateSubHScroll_Change()Label1.Text=HScroll.CaptionEndSub

D、PrivateSubHScroll_Click()Label1.Text=HScroll.CaptionEndSub

请帮忙给出正确答案和分析，谢谢！