Russian version
English version
| | | | SILICON TAIGA | ISDEF | CD | | | | | | | |
 
 
 
IT-
 
 
 
RSS-

Visual Basic (c )

WAV . , WAV Windows - . "01" . Visual Basic. , .

  • 1 -

  • 2 - CommandButton

  • 3 - ٸ ToolBar Components

  • 4 - Microsoft Multimedia Control 6.0 ( 6.0 , Visual Basic)

  • 5 - Visible=false

  • 6 -

  • 7 -

Private Sub Form_Load() 
 MMControl1.FileName=app.path & "\01.wav"
 MMControl1.Command = "open" 
End Sub
Private Sub Command1_Click() 
 MMControl1.Command = "prev" 
 MMControl1.Command = "record" 
 Command2.Enabled = True 
End Sub 
Private Sub Command2_Click() 
 MMControl1.Command = "stop" 
 MMControl1.Command = "save" 
 MMControl1.Command = "prev" 
 Command3.Enabled = True 
End Sub 
Private Sub Command3_Click() 
 MMControl1.Command = "play" 
 MMControl1.Command = "prev" 
End Sub 

8 - Caption CommonButton. - , - , - .

:


     
 
 
  : 29.08.2006  

| | | | SILICON TAIGA | ISDEF | CD | | | | | | | |

: Silicon Taiga    
Rambler's Top100 Rambler's Top100