在窗体上画一个名称为 Text1 的文本框,然后画一个名称为 HScroll1 的滚动条,其 Min 和 Max 属性分别为 0 和 100 ,程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值。以下能实现上述操作的是 ( ).
A.
Private Sub HScroll1_Change() Text1.Text = HScroll1.Value End Sub
B.
Private Sub HScroll1_Click() Text1.Text = HScroll1.Value End Sub
C.
Private Sub HScroll1_Change() Text1.Text = HScroll1.Caption End Sub
D.
Private Sub HScroll1_ Dblclick () Text1.Text = HScroll1.Value End Sub