|
ارجو المساعده في تصحيح شفره (صغنونه) السلام عليكم in model PublicDeclareFunction Inp Lib"inpout32.dll"Alias"Inp32" (ByVal PortAddress AsShort) AsByte PublicDeclareSub Out Lib"inpout32.dll"Alias"Out32" (ByVal PortAddress AsShort, ByVal Value AsByte) PrivateSub Form1_KeyDown(ByVal sender AsObject, ByVal e As System.Windows.Forms.KeyEventArgs) HandlesMe.KeyDown If e.KeyCode = Keys.End Then Out(888, 1) PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MsgBox(Inp(888)) EndSub:( كتبت الشفره السابقه وكان من المفترض بعد الضغط على المفتاح End ان تظهر لي رساله بعد الضغط على ال Button وان يكتب رقم المنفذ الذي خرجت له القولتيه لكن دائما الرقم 0 لا اعلم ماهو الخطئ حيث وضعت المكتبه في الملف System32 ارجو المساعده واشكر لكم مروركم مقدما :) |
| الساعة الآن 11:40 PM |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO 3.5.2 TranZ By
Almuhajir