窗体上有一个名为HScrollBar1的水平滚动条和一个名为TextBox1的文本框。当移动滚动条中的滑块时，在文本框中显示滑块的当前位置值。下列能实现上述操作的程序段是______。

A、Private Sub HScrollBar1_GotFocus(…) Handles HScrollBar1.GotFocus TextBox1.Text = HScrollBar1.Value End Sub

B、Private Sub HScrollBar1_Scroll(…) Handles HScrollBar1.Scroll TextBox1.Text = HScrollBar1.Value End Sub

C、Private Sub TextBox1_KeyPress(…) Handles TextBox1.KeyPress TextBox1.Text = HScrollBar1.Value End Sub

D、Private Sub TextBox1_TextChanged(…) Handles TextBox1.TextChanged TextBox1.Text = HScrollBar1.Value End Sub