A.Private Sub HScroll 1_Change() Print HScroll1.Value End Sub B.Private Sub HScroll 1_Change() Print HScroll1.SmallChange End Sub C.Private Sub HScroll1 Scroll() Print HScroll1.Value End Sub D.Private Sub HScroll1_Scroll() Print HScroll1.SmallChange End Sub