在窗体上画两个滚动条,名称分别为Hscrolll、Hscroll2;六个标签,名称分别为Label1、Label2、 Label3、
A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub
B.Private Sub Command1_Click() Label3.Caption=HScrolll.Value*HScroll2.Value End Sub
C.Private Sub Commandl_click() Label3.Caption=HScrolll*HScroll2 End Sub
D.Private Sub Command1_Click() Label3.Caption=HScrolll.Text*HScroll2.Text End Sub