mostafazidani
- هل انا متصل بالانترنت او لا
وين الخطأ
- كتابين رائعين من كتب الفجيوال بيسك من SAMS
بالفعل كما ذكر اخي النبهاني بانه لايبدأ التحميل من أصله تاكد من الوصلات ولكن شكرا لك اخي محمد
- هل انا متصل بالانترنت او لا
في الخدمة
- هل انا متصل بالانترنت او لا
جرب استخدام اداة ال winsock وقم بفحص الخاصية LOCALIP فاذا كانت لاتساوي "127.0.0.1" معناه انك متصل بالانترنت والا فإنك غير متصل IF winsock1.localip<>"127.0.0.1" then msgbox "you are connected to internet" else msgbox "you are not connected" end if
- استفسار عن ListBox
المثال التالي يفي بالغرض popup.zip
- Visual Basic Commands & Tips
شكرا لك ويعطيك العافية
- القوائم
تفضل أخي مع مع العلم اني لم أكتب البرنامج لضيق الوقت howto_menu_pictures.zip
- تنزيل معلومات الصورة اتوماتيكيا
سؤال أخير هل هاي المعلومات داخل صوره غير صورة السيارة المراد أخذ المعلومات لها ؟
- تنزيل معلومات الصورة اتوماتيكيا
معناها انو المعلومات عبارة عن صورة مادام المعلومات جوا الصورة صح؟ بمعنى بدك اقتصاص المعلومات من الصورة ؟
- التنقل بين الفورمات بالكيبورد
هي على التوالي vbkeyright يمين vbkeyleft يسار vbkeyup أعلى vbkeydown تحت
- اختصارات مفيده في الفوتو شب
الف شكر لك اخي على الكتاب
- التنقل بين الفورمات بالكيبورد
شكرا لكم جميعا ياأخوان
- التحكم بصفحات الDataReport
اخي هناك أداة وهي على شكل الجمع (summation) ضمن ادوات التقرير ماعليك الا رسم هذه الاداة على التقرير ومن ثم اذهب الى الخصائص وضع خاصية datasource لهذه الأداة الى الحقل الذي تريد جمع قيمه
- التنقل بين الفورمات بالكيبورد
كيفك ياهاوي اولا غير الكود الذي كتبته الى vbkeyescape اذا كنت تريد مفتاح ESCAPE هو الذي يعمل وايضا VBkeyenter او vbkeyreturn لمفتاح الإدخال
- التنقل بين الفورمات بالكيبورد
حبيبنا يامحمد
- تنزيل معلومات الصورة اتوماتيكيا
طيب وين هاي المعلومات مخزنة حتى نستطيع التعامل معها
- الترقيم الاوتوماتيكي
لاشكر على واجب يادارين
- كيفية إعادة تسمية المجلدات Folders
الفكرة هي كالتالي هي ان تحصل على مسار المجلد ثم من المسار تستخرج اسم الفولدر وتخزنه في متغير بعد ذلك تستطيع ان تستخد الدالة NAME.... AS وعندما تريد ان ترجع الاسم القديم للفولدر تستخدم نفس الدالة NAME.... AS مع اسم الفولدر المخزن في المتغير . ارجو ان تكون الفكر…
- التحميل من الأنترنت
اكرر الطلب مرة اخرى فهل من مجيب
- الترقيم الاوتوماتيكي
انا عرفت الغلط تفضلي اخت دارين b = Right(maskedit1.Text, Len(Mid(maskedit1.Text, 7, Len(maskedit1.Text)))) Dim a As Variant a = Left(maskedit1.Text, 6) a = a + 1 maskedit1.Text = a & b