Åben og luk CD skuffen. smilly har modtaget 10 point for dette tip Fra : smilly Vist : 644 gange Dato : 04-12-00 15:41

Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long Private Sub cmdOpen_Click() retvalue = mciSendString("set CDAudio door open", returnstring, 127, 0) End Sub Private Sub cmdClose_Click() retvalue = mciSendString("set CDAudio door closed", returnstring, 127, 0) End Sub

Bedømmelse Fra : stk Dato : 16-03-01 12:59

Bedømmelse Fra : dkjora Dato : 05-04-01 14:19

Bedømmelse Fra : Harlekin Dato : 02-02-01 12:42

Bedømmelse Fra : nuser34 Dato : 19-10-01 10:04

Bedømmelse Fra : somar Dato : 21-10-01 09:55

Du har følgende muligheder

Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip. Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.