窗体上有一个文本框Text1和一个水平滚动条HScroll1，且HScroll1的Min和Max属性值分别为10和40。程序运行后，如果移动HScroll1的滚动框，则文本框Text1中的文字大小随着滚动框位置的变化同步改变。以下能实现上述操作的过程是( )。

A．Private Sub HScroll1_Change() Text1.FontSize = HScroll1.Value End Sub
B．Private Sub HScroll1_Change() Text1.FontSize = HScroll1.Caption End Sub
C．Private Sub HScroll1_Click() Text1.FontSize = HScroll1.Value End Sub
D．Private Sub HScroll1_Click() Text1.FontSize = HScroll1.Caption End Sub