:: مهندس متواجد ::
تاريخ التسجيل: May 2006
المشاركات: 53
|
|
نشاط [ gedo ]
قوة السمعة:0
|
|
23-09-2007, 07:58 PM
المشاركة 2
|
|
افيدونى افادكم الله
السلام عليكم ورحمه الله وبركاته
ازيكم ياشباب اية اخباركم - المهم بالنسبة للموضوع ده هو كل المشكلة انى عايز اتحكم فى الpin لوحده فقط على سبيل المثال
الكود ده فى موديل:-
كود:
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
بعد مااضفنا الكود فى الموديل انا عايز اتحكم فى pin رقم 2 و 3 مع الارضى 25
انا هشغل ال pin رقم 2 عن طريق الكود ده كده
كود:
Private Sub Command1_Click()
Out &H378, 2
End Sub
اوك طيب ال pin رقم 3 شغال اساسا وهنا تيجى المشكلة؟
عايز اطفى pin 2 من غير ما ينطفىء pin 3 ولكن ...... تهىء
Private Sub Command2_Click()
Out &H378, 0
End Sub
يقفل كل الpin الشغالة
حتى عند التحكم فى ال pin رقم 3 فقط قصدى عايز اشغل pin 3 فقط عن طريق
Private Sub Command3_Click()
Out &H378, 3
End Sub
يشغلى الpin رقم 2 و 3 مش 3 فقط
ياريت ياجماعة الى يعرف حاجة عن الموضوع او ازاى يتحكم فى كل pin بدون تاثير على باقى ال pin الاخرى يقول الله يكرمكم وشكرا
|