الشرق الاوسط

حسنا سوف احاول مرة اخرى اثناء بحثي وجدت مثال اروع واجمل من السابق ولا يحتاج الى اضافة اي مرجع الى تطبيقك ومختصر جدا Function IsPrnOffLine(ByVal myprn As String) As Boolean IsPrnOffLine = GetObject("winmgmts:\\.\root\CIMV2").Get("Win32_Printer='" & myprn & "'")…

اخي VB Helper بعد تجربة المثال وجدت انه فقط يتأكد من وجود اسم الطابعه ضمن مجموعة الطابعات على الجهاز ولا يكشف عن حالة الطابعه وبعد البحث وجدت هذا المثال وهو فعلا يعطيك حالة الطابعه بشكل دقيق وللفائده احببت ان اضعه هنا اولا اذهب الى Project ثم Add Reference ومن…

وعليكم السلام ورحمه الله وبركاته الف شكر ومحبه وتقدير لك يا اخي VB Helper

اخواني الكرام اريد معرفة حالة الطابعه الافتراضيه اذا كانت متصله بالجهاز او انها غير متصله او هل هي تعمل ام معطله وذلك قبل البدء بعملية الطباعه وشكرا لكم

الف شكر يا أخي

بعد التجربه والمحاولات المتكرره وجدت بان بناء تطبيق على Windows Service يحتاج الى اضافة الى Control Panel - Administrative Tools - Services بواسطة installutil ومن ثم لكي يتم تنفيذه لابد من الدخول على Control Panel - Administrative Tools - Services واختيار المش…

الف شكر وتحيه على المساعده الكريمه تحياتي

الاخوه الكرام السلام عليكم ورحمة الله وبركاته ابارك لكم قدوم شهر رمضان سؤالي عن التطبيقات الخفيه التي ليس لها فورم ولا ايقونه في البار السفلي فكرتي هي عمل تطبيق خفي يقوم بعمل ايقاف تشغيل الكمبيوتر Shut Down كل يوم الساعه العاشره مساءً فقط اريد معرفة الفكره لعم…

أخي الكريم Ali Al-Zyoud اشكرك من كل قلبي على المساعده جاري تطبيق المثال الرائع سلمت يداك

اخيرا وجدت الحل وللفائده اليكم ما وجدت هذا الكود يكشف اي ضغطة Click للفأره سواء داخل الفورم او خارجها ولا يرتبط بالدوال Public Class Form1 Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer Private Sub Button1_Click(ByVal se…

اخي الكريم المقصود لو قمنا بالضغط على ايقونه موجوده على سطح المكتب وهي بالتأكيد خارج فورم التطبيق فهل يمكن للتطبيق المعمول بالفيجوال بيسك اكتشافها

اخي الكريم رائع هذا الحل ولكن ما ازال بحاجة الى ان اضيف جميع الدوال الى حدث mouse down هل هناك طريقه لكشف ضغطة الفأره ولو كانت خارج الفورم ؟ كما هو الحال في برامج حافظ الشاشه

اخواني الاعزاء السلام عليكم ورحمة الله وبركاته جميعنا يعرف برامج Screen Saver التي تحفظ وتحمي الشاشه سؤالي هو كيف يمكنني عن طريق الفيجوال بيسك مراقبة وكشف ضغطات الماوس على مستوى الفورم بجميع ما فيه من دوال وكنترولز كما يعمل حافظ الشاشه على مستوت سطح المكتب ؟؟؟…

اخي الفاضل سلمت يداك فعلا هذا هو الحل انا عاجز عن الشكر والتقدير بارك الله فيك وفي خبرتك الرائعه وكثر من امثالك الف شكر وتحيه

اخواني الخبراء هذا بالضبط ما اريد فعله وانا فعلا اعمل على تطبيق متعدد الواجهات MDI واريد التحكم بالواجهات من حيث الفتح والاغلاق بحيث انني فقط ارسل اسم الفورم بصيغة string الى sub وهي تقوم بالتقاط الفورم وتنفيذه وكذلك اغلاق فورم آخر بالنسبة للفورم المفتوح يمكن …

اخي الرائع العزيز اشكرك جزيل الشكر على مساعدتك جربت الكود ولكن المعالج يعطي رسالة وهي Name 'Assembly' is not declared كيف نقوم بتعريف Assembly نفس المشكله حصلت معي حينما جربت الكود For Each frm In My.Forms CType(frm.Controls("Label" + i.ToString), Label).Text …

أخي الكريم انا اريد تطبيق المثال على الفورم وليس اليبل بهذا الشكل CType(frm.Controls("Form" + i.ToString), Form).Text = i.ToString ولكن المعالج يعطيني رسالة خطا

اخي العزيز سوف اغير صيغة السؤال ماذا لو كان لدينا 20 فورم واردنا تغيير التكست الخاص بكل فورم على حده بطريقه غير تقليديه كأن نستخدم Ctype هذا مثال لاستخدام Ctype مع ليبل For i = 1 To 7 CType(Me.Controls("Label" + i.ToString), Label).Text = i.ToString Next هل يم…

اخي VB Helper هذا الحل جميل ولكن لن يحل لي مشكلتي ولك كل الشكر

لنتخيل بانه لدينا فورم1 وفورم2 ويوجد على فورم2 زر به امر msgbox لعرض رسالة معينه لاستدعاء حدث لزر داخل الفورم Button1_Click(Me, e) Or Button1_Click(Nothing, Nothing) لاستدعاء حدث لزر داخل فورم آخر وهو فورم2 يجب ان لا يكون الحدث الموجود بفورم2 بشكل خاص Private …