当前位置: X题卡 > 所有题目 > 题目详情

在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2;六个标签,名称分别为Label1、Label2、Label3,La- bel4、Label5、Label6,其中标签Label4~L...

查看本题答案

你可能感兴趣的试题

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 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=HScroll1*HScroll2 End Sub  Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub  
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=HScroll1.Value*HScroll2.Value
End Sub  
Private Sub Command1_Click()
Label3.Caption=HScroll1*HScroll2
End Sub  
Private Sub Command1_Click()
Label3.Caption=HScroll1.Text*HScroll2.Text
End Sub  
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=HScroll1*HScroll2 End Sub  Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub  
Private Sub HScroll 1_Change() Print HScroll1.Value End Sub  Private Sub HScroll 1_Change() Print HScroll1.SmallChange End Sub  Private Sub HScroll1 Scroll() Print HScroll1.Value End Sub  Private Sub HScroll1_Scroll() Print HScroll1.SmallChange End Sub  
Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Captio*Val(Label2.Captio) End Sub  Private Sub Command1_Click() Label3.Caption=HScrollValue*HScroll2.Value End Sub  Private Sub Commandl_click() Label3.Caption=HScrolll*HScroll2 End Sub  Private Sub Command1_Click() Label3.Caption=HScrollText*HScroll2.Text End Sub  
Private Sub Hscroll1_Change()  Print Hscroll1.Value  End Sub  Private Sub Hsetroll1_Change()  Print Hscroll1.SmallChange  End Sub  Private Sub Hscroll1_Scroll()  Print Hscroll1.Value  End Sub  Private Sub Hscroll1_Scroll()  Print Hscroll1.SmallChange  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 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 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  
Private Sub HScroll1_Scroll()  Print HScroll1.Value  End Sub  Private Sub HScroll1_Scroll()  Print HScroll1.SmallChange  End Sub  Private Sub HScroll1_Change()  Print HScroll1.Value  End Sub  Private Sub HScroll1_Change()  Print HScroll1.SmallChange  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 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=HScroll1*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=HScroll1.Value*HScroll2.Value
End Sub  
Private Sub Command1_Click()
Label3.Caption=HScroll1*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=HScroll1.Value*HScroll2.Value End Sub  Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End Sub  Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub  

热门试题

更多