تقييم الموضوع :
  • 1 أصوات - بمعدل 1
  • 1
  • 2
  • 3
  • 4
  • 5
[مشروع] تصميم برنامج فتح و غلق السيدي روم
#1
بسم الله الرحمن الرحيم
مشروع طريقة تصميم برنامج فتح و غلق السيدي روم
السلام عليكم و رحمة الله و بركاته
اليوم أعزائي الاعضاء سوف أشرح لسيادتكم طريقة تصميم برنامج بالفيجوال بيسك 6 و هو برنامج لفتح و غلق السيدي روم
بإذن الله الكود بسيط و التصميم سهل
علشان مطولش على سيادتكم و ضعت لسيادتكم الفيدو التالي
أما بالنسبة للكود فا في التصريحات العامة سوف تضع هذا الكود

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


Public Sub OpenCDDriveDoor(ByVal State As Boolean)
If State = True Then
Call mciSendString("Set CDAudio Door Open", 0&, 0&, 0&)
Else
Call mciSendString("Set CDAudio Door Closed", 0&, 0&, 0&)
End If
End Sub


أما في الزر الاول (command 1)


Private Sub Command1_Click()
OpenCDDriveDoor (True) 'فتح
End Sub




أما في الزر الاول (command 2)


Private Sub Command2_Click()
OpenCDDriveDoor (False) 'اغلاق
End Sub
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  برنامج موظفين رائع مصعب القرشي 7 1,035 28-03-17, 09:07 PM
آخر رد: Amir_alzubidy
  إهداء للجميع - مثال أو برنامج أرشيف صور المستندات Ahmed_Mansoor 9 2,068 08-03-17, 03:42 PM
آخر رد: awidan76
  برنامج مبيعات خاص Ahmed_Mansoor 26 2,812 14-02-17, 01:03 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] برنامج جدول الحصص الاسبوعي ابن دوعن 1 378 22-01-17, 11:16 AM
آخر رد: Ahmed_Mansoor
Wink [vb6.0] مشروع برنامج لمتابعة السيارات thecareep 6 509 03-01-17, 11:50 AM
آخر رد: ابن دوعن
Information [vb6.0] برنامج فجوال بيسك باللغة العربية ابن دوعن 0 203 03-01-17, 11:41 AM
آخر رد: ابن دوعن
Wink [vb6.0] مشروع برنامج لمتابعة الجوازات ورخص العمل thecareep 3 397 08-12-16, 01:40 AM
آخر رد: Ahmed_Mansoor
  محتاج برنامج صندوق الدفعيات لمدة عام كنونو 9 387 20-11-16, 10:20 PM
آخر رد: ahmedabdelaliem
  [مثال] برنامج المؤذن abulayth 11 2,173 05-09-16, 09:57 AM
آخر رد: abulayth
  برنامج ترشيحات مفتوح المصدر مصعب القرشي 3 371 21-06-16, 02:20 AM
آخر رد: مصعب القرشي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم