تقييم الموضوع :
  • 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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  إهداء للجميع - مثال أو برنامج أرشيف صور المستندات Ahmed_Mansoor 9 1,781 08-03-17, 03:42 PM
آخر رد: awidan76
  برنامج موظفين رائع مصعب القرشي 5 835 27-02-17, 05:25 PM
آخر رد: عبد العزيز البسكري
  برنامج مبيعات خاص Ahmed_Mansoor 26 2,520 14-02-17, 01:03 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] برنامج جدول الحصص الاسبوعي ابن دوعن 1 289 22-01-17, 11:16 AM
آخر رد: Ahmed_Mansoor
Wink [vb6.0] مشروع برنامج لمتابعة السيارات thecareep 6 434 03-01-17, 11:50 AM
آخر رد: ابن دوعن
Information [vb6.0] برنامج فجوال بيسك باللغة العربية ابن دوعن 0 160 03-01-17, 11:41 AM
آخر رد: ابن دوعن
Wink [vb6.0] مشروع برنامج لمتابعة الجوازات ورخص العمل thecareep 3 325 08-12-16, 01:40 AM
آخر رد: Ahmed_Mansoor
  محتاج برنامج صندوق الدفعيات لمدة عام كنونو 9 337 20-11-16, 10:20 PM
آخر رد: ahmedabdelaliem
  [مثال] برنامج المؤذن abulayth 11 2,078 05-09-16, 09:57 AM
آخر رد: abulayth
  برنامج ترشيحات مفتوح المصدر مصعب القرشي 3 328 21-06-16, 02:20 AM
آخر رد: مصعب القرشي

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


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