A.Private Sub Commandl_Click() Labe13.Caption=Str(Val(Labell.Caption)*Val(Labe12.Capfion)) End Sub B.Private Sub Commandl_Click() Labe13.Caption=HScro111.Value*HScro112.Value End Sub C.Private Sub Commandl_Cliek() Labe13.Caption=HScrolll*HScro112 End Sub D.Private Sub Commandl_Click() Labe13.Caption=HScro111.Text*HScro112.Text End Sub