你可能感兴趣的试题
Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Captio*Val(Label2.Captio) End Sub Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End Sub Private Sub Command1_Click() Label3.Caption=HScrolll*HScroll2 End Sub Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub
Private Sub Command1_Click()
Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption))
End Sub Private Sub Command1_Click()
Label3.Caption=HScrolll.Value*HScroll2.Value
End Sub Private Sub Commandl_click()
Label3.Caption=HScrolll*HScroll2
End Sub Private Sub Command1_Click()
Label3.Caption=HScrolll.Text*HScroll2.Text
End Sub
Private Sub Commandl_Click()
Labe13.Caption=Str(Val(Labell.Caption)*Val(Labe12.Capfion))
End Sub Private Sub Commandl_Click()
Labe13.Caption=HScro111.Value*HScro112.Value
End Sub Private Sub Commandl_Cliek()
Labe13.Caption=HScrolll*HScro112
End Sub Private Sub Commandl_Click()
Labe13.Caption=HScro111.Text*HScro112.Text
End Sub
Private Sub Hscroll1_Change( ) Text1.Text=Hscroll1.Value End Sub Private Sub Hscroll1_Click( ) Text1.Text=Hscroll1.Value End Sub Private Sub Hscroll1_Change( ) Text1.Text=Hscroll1.Caption End Sub Private Sub Hscroll1_Click( ) Text1.Text=Hscroll1.Caption End Sub
Private Sub Commandl_Click() Labe13.Caption=Str(Val(LabelCaptio*Val(Labe12.Capfio) End Sub Private Sub Commandl_Click() Labe13.Caption=HScro111.Value*HScro112.Value End Sub Private Sub Commandl_Cliek() Labe13.Caption=HScrolll*HScro112 End Sub Private Sub Commandl_Click() Labe13.Caption=HScro111.Text*HScro112.Text End Sub
Private Sub Command1_Click()
Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption))
End Sub Private Sub Command1_Click()
Label3.Caption=HScroll1.Value*HScroll2.Value
End Sub Private Sub Command1_Click()
Label3.Caption=HScrolll*HScroll2
End Sub Private Sub Command1_Click()
Label3.Caption=HScroll1.Text*HScroll2.Text
End Sub