مختار حسين محمود قام بنشر أكتوبر 5, 2015 قام بنشر أكتوبر 5, 2015 أساتذتى واخوانى الأعزاء السلام عليكم ورحمة الله وبركاته اليوم أقدم لكم كودا تستطيع من خلاله أن تعرض على المستخدم رسالة Message box ثم تختفى الـ Message box بعد تعامل المستخدم مع أزرار ها فاذا لم يتدخل تختفى الـ Message box تلقائيا بعد مدة زمنية محددة الكود وعليه شرح بسيط : Sub MokhtarTest() Dim Title As String Dim Delay As Byte Dim iType As Integer Dim Msg As String Dim MyObject As Object ' عنوان الرساله Title = " منتدى أوفيسنا" Delay = 2 ' مدة عرض الرساله بالثانية iType = 0 ' نوع الرسالة يساوى عدد مما يأتى ' من 128 الى 134' من 64 الى 70 ' من 32 الى 38 ' من 16 الى 22 ' من صفر الى 6 Msg = Space(10) & "مرحبا" & vbLf & vbLf & " تاريخ اليوم " & vbLf & vbLf & Date ' حجم ونص الرسالة Set MyObject = CreateObject("WScript.Shell") MyObject.Popup Msg, Delay, Title, iType Set MyObject = Nothing ' تفريغ الذاكرة End Sub تفضلوا المرفق والسلام عليكم displays a timed Message box then hide without click buttons .rar 4
محمد حسن المحمد قام بنشر أكتوبر 5, 2015 قام بنشر أكتوبر 5, 2015 (معدل) السلام عليكم ورحمة الله وبركاته.... لا أجد تعبيراً أفضل من جزاك الله خيراً.... تم تعديل أكتوبر 5, 2015 بواسطه محمد حسن المحمد
إبراهيم ابوليله قام بنشر أكتوبر 5, 2015 قام بنشر أكتوبر 5, 2015 اخى مختار فكره جميله وكود جميل فى انتظار المزيد تقبل تحياتى
مختار حسين محمود قام بنشر أكتوبر 5, 2015 الكاتب قام بنشر أكتوبر 5, 2015 أخى الأستاذ محمد حسن ما أروع كلماتك الرقيقة بارك الله فيك أخى الأستاذ ابراهيم ابو ليله أشكرك شكرا جزيلاً بارك الله فيك
جعفر الطريبق قام بنشر أكتوبر 5, 2015 قام بنشر أكتوبر 5, 2015 مشكور يا أستاد مختار حسين على الكود الجميل
مختار حسين محمود قام بنشر أكتوبر 5, 2015 الكاتب قام بنشر أكتوبر 5, 2015 أخى وأستاذى العزيز جعفر بارك الله فيك شرفنى مروركم الكريم لك كل التحية والتقدير
عبد العزيز البسكري قام بنشر أكتوبر 5, 2015 قام بنشر أكتوبر 5, 2015 السّلام عليكم و رحمة الله و بركاته بارك الله أستاذنا الفاضل مختار حسين محمود .. كود رائع و الفكرة أروع .. نقلته إلى حدث الذيس وورك بوك .. فأصبح الميساج بوكس عبارة عن رسالة إشهارية إفتتاحية .. جزاك الله خيرًا و زادها بميزان حسناتك 1
ياسر خليل أبو البراء قام بنشر أكتوبر 5, 2015 قام بنشر أكتوبر 5, 2015 مش هطول في الكلام أخي الغالي مختار هما كلمتين وبس :: ما أروعك! 1
مختار حسين محمود قام بنشر أكتوبر 6, 2015 الكاتب قام بنشر أكتوبر 6, 2015 أخى العزيز خالد الشاعر جزاكم الله خيرا وتقبل الله منا و منكم أخى العزيز عبدالعزيز جزاكم الله خيرا وتقبل الله منا و منكم أخى وأستاذى الغالى ياسر جزاكم الله خيرا وتقبل الله منا و منكم يا معلمى العزيز
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.