gaf58

الشكر لله وحده اخواني الافاضل

الشكر لله وحده اخي الفاضل

جرب اخي الكريم هذا الرايط http://www.vb4arab.com/vb/showthread.php?t=40134

اخواني الافاضل شكرا جزيلا لاهتمامكم و معاونتكم السريعة و المثمرة

اخواني الاعزاء السلام عليكم و رحمة الله و بركاته قي المثال المرفق لي سؤال هل يمكن جعل الاسماء مرتبة ابجديا في الكومبو بوكس علي الرغم انها ليست مرتبة في قاعدة البيانات ------------- بالكود تحياتي Solution.zip

شكرا جزيلا للاصدفء الافاضل علي الاهتمام و المساعدة gaf58

الاخوة الافاضل عند تطبيق الكود التالي Private Sub Command3_Click() Dim strinput As String strinput = InputBox("Enter Home1,Home2 ,Bussiness,Office OR Mobile Phone and Wait for search", "gaf58AddressBook") '============================ Dim strSql As String Dim …

الاخت الفاضلة مرفق مثال البحث بواسطة الكومبو يمكنك تعديله الي list تحياتي how to_search by combo.zip

اخي اللفاضل ضع ملف mp3 في مسار المشروع وسميه f1002 ثم ضع الكود التالي في الفورم Dim strSound As String Private Sub Form_Load() ' MEDIApLAYER strSound = App.Path & "\F1002.mp3" MediaPlayer1.FileName = strSound End Sub

اخي الفاضل With Form1 '. .Move (Screen.Width - .Width) / 2, (Screen.Height - .Height) / 2 end with

الاخ الفاضلhnhn الشكر لله وحده و با سيدى والله القلوب عند بعضها

اخي العزبز hnhn folder option-------> view-------> remve mark of hide file extension apply then Ok الان انت ترىالاكتنشن بتاع اى فايل مثل .mdb - .txt rt clik on db file ------> rename -------> remove mdb and put any extension u need as .gi for example this will…

عزرا لقد نسيت ان ازكر ان ه>ا الكود يحدد رقم البورت بالرقم الاخير في ال combo وهو 8 For a = 1 To 8 MSComm1.CommPort = a If MSComm1.PortOpen = False Then Combo1.Text = MSComm1.CommPort End If Next a فهل من سبيل لجعله يحدد رقم البورت الصحيح ؟؟؟؟؟

الاخ الفاضل حمزة شكرا جزيلا لاهتمامك For a = 1 To 8 MSComm1.CommPort = a If MSComm1.PortOpen = False Then Combo1.Text = MSComm1.CommPort End If Next a بالطبع يمكن الغاء هزا الكود و ندع المستخدم يختار رقم البورةت للمرة الاولي ونسجله في الريجستيرى و سوف لايحتاج …

الاخوة الافاضل هل اطمع في ان اجد من يصحح لي هزا الكود بطريقة سهلة فانا مازلت مبتدء انا استعمل هزا الكود في الاتصال التليفوني ولكني فكل مرة اضطر لاختيار البورت من اللستة فهل من طريقة تحدده اتوماتيكالي. الكود: -------- Private Sub Command1_Click() Command1.Visib…

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

الاخوة الافاضل السلام عليكم و رحمة الله هل يمكن ان يدلني احد علي كيفية الحصول علي شرح الاخ القسام لاستخدام برنامج "SetupFactory" جزاكم الله خيرا

اخي الفاضل يمكنك التوجه للعنوان التالي سوف تجد ما تريد http://www.arabdevelopers.com/vbb/showthre...13457#post13457