Sto se tice zvuka, mozes i bez API poziva. Recimo OLE, ili ActiveX kontrola Microsoft Multimedia Control (MMC). Sto se tice command dugmeta, probaj da koristis tri slike (od kojih dve postavis da budu nevidljive). Onda za trecu sliku upises code:
Private Sub Image3_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
image3.Picture=image1.picture
End Sub
Private Sub Image3_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
image3.Picture=image2.picture
End Sub
P.S.
Prva slika je slika kada je dugme pritisnuto, a druga kada nije.