• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

asi-tojprogrammer

اعضاء
  • عدد المشاركات

    58
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

0 عادي

عن asi-tojprogrammer

  • الرتبة
    عضو
  • تاريخ الميلاد 08/20/1987

معلومات الملف الشخصي

  • الجنس ذكر
  • الدولة : samllville
  1. يا شباب لو سمحتم اريد شرح مفصل للغة Microsoft SQL Server مع الشكر الجزيل
  2. انا عايز اعمل مشروع مثل لعبة من سيربح المليون و اريد ان يظهر السؤال و تكون الاجابة على احد اربعة ازرار ، و ساستخدم قاعدة Random العشوائية بحيث اذا كان الجواب صحيح ينتقل للسؤال التالي و السؤال التالي سوف يُختار عشوائيا ً ، ولكن المشكلة هي انه كيف اجعل الجواب الصحيح يختلف موضعه الى زر اخر كل مرة . هل تنصحوني ان اجعل الاسئلة في قاعدة بيانات ، و اذا كان هذا الخيار هو الافضل كيف اعمل الاستعلام
  3. كيف يمكن عمل استعلام في VB.NET 2005

    من خلال جملة Select
  4. عمل back up للداتا بيز

    شكرا لاخوان على الجواب انا ايضا كنت محتاج لهذا
  5. يا اخوان كيف يمكنني عمل استعلام في VB.NET 2005 و ارجو الدر على سؤالي
  6. الفئات (Class) و التركيبات ( Structure)

    شكرا على الموضوع المهم و لكن يكون افضل لو كتبته على المنتدى
  7. الشفرة الموحدة Unicode

    تسلم وشكرا
  8. ContextMenuStrip تظهر عند الضغط على زر

    الاخوان سبقوني
  9. F1-F12 لفتح الفورم

    بصراحة لا اعرف و ترى مو عيب
  10. DateTimePicker

    لن ازيد على ما قالته الاخت صاحبت السمو
  11. الاحداث

    شكرا على الردور ، و شكرا لملاحظة الاخ سامر سوف اعطي مثالا عن الحدث KeyPress ، هذا الكود سيقوم بجعل مفتاح Tab يعمل بدلا من مفتاح Enter [left]Private Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then SendKeys "{TAB}" KeyAscii = 0 End If End Sub[/left]
  12. جعل افورم بالسنتر

    مشكووووووووووووور
  13. اذا اردت ان تغير عنوان زر إبدأ فى شريط المهام اكتب هذا الكود كود: Dim jeff As String Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Any) As Long Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassN*** As String, ByVal lpWindowN*** As String) As Long Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long Private Const WM_SETTEXT = &HC Private Sub Command1_Click() MsgBox "åÐÇ ÇáÈÑäÇãÌ íÞæã ÈÊÛííÑ ßáãÉ ÅÈÏà Ýì ÔÑíØ ÇáãåÇã Åáì ÇáßáãÉ ÇáÊì ÓÊßÊÈåÇ Ýì ãÑÈÚ ÇáÅÏÎÇá", vbInformation, "ÈÑäÇãÌ ÊÛííÑ ÚäæÇä ÒÑ ÅÈÏÃ-ÈÑãÌÉ ãÓÊÑ ÓÇãÍ" jeff = InputBox("ÃßÊÈ ÇáßáãÉ ÇáÊì ÊÑíÏ Ãä ÊÙåÑ ãßÇä ßáãÉ ÅÈÏÃ", "ãÑÈÚ ÅÏÎÇá", "Start") Dim tWnd As Long, bWnd As Long tWnd = FindWindow("Shell_TrayWnd", vbNullString) 'Get the start-button's window handle bWnd = FindWindowEx(tWnd, ByVal 0&, "BUTTON", vbNullString) SendMessage bWnd, WM_SETTEXT, &O0, jeff 'SetWindowText bWnd, Text1.Text End End Sub Private Sub Form_Load() End Sub اإن شاء الله تكونوا قد فهمتم الكود :P
  14. اجعل الفورم اجمل

    أضف الاسطح skins إلى برنامجك ليصبح أكثر جمالا أضف أداة ActSkin4.ocx إلى مربع الأدوات ثم أضفها فى برنامجك واكتب الكود التالى عند الحدث الذى ترغب أن تظهر عنده السمه مثل حدث تحميل النموذج أو حدث الضغط على زر أمر كود: Skin1.LoadSkin App.Path & "\Zhelezo.skn" Skin1.ApplySkin Me.hWnd حمل هذا الملف وبه برنامج جاهز و15 skin والأداة المطلوبه لذلك من الرابط التالى http://www.9q9q.net/up3/index.php?f=4a264YUvt أمثلة لبعض الاسطح التى يمكن أن تزين بها برنامجك http://img242.imageshack.us/img242/4782/2mr2.jpg لكم خالص تحياتى أى استفسار أو سؤال عن كيفية استخدام الأداة
  15. الاحداث

    الاحداث : الاحدث هي التي يستجيب لها برنامج فيجول بيسيك ولولاوجودها لما استطعنا ان نحدد للبرنامج متى ينفذ الامر الذي نريدة انة ينفذة فمثل load اي عند وقوع الحدث name الشرح active يقع بعد تحميل النافذة اي بعد وقوع حدث load click عند النقر المفرد على الفارة dbclick عند النقر المزدوج على الفارة gotfocus عند اخذ التركيز لاداة معينة lostfocus عند فقد التركيزلاداة معية keydown عند نزول الزر الى الاسفل keypress عند الضغط على اي زر من لوعة المفاتيح keyup عند طلوع زر لوعة المفاتيح الى الاعلى load عند تحميل النافذة الرئيسية mousedown عند نزول زر الفارة الى الاسفل mousemove عن تحرك الفارة على اداة معينة mouseup عند طلوع زر الفارة الى الاعلى paint عند اعادة رسم النافذة resize عند تغير حجم النافذة unload عند الغاء تحميل النافذة