المبرمج أحمد

استخدم الأمر Print بدلا من Write . بالمناسبة لقد نسيت إرفاق الملف ...

النت عندنا في الرياض آخر حلاوة ، لم أواجه أي مشاكل حتى الآن :) الله يكون في عونكم ،،

الرجاء استخدام خاصية البحث في المنتدى ، حيث أن هذا الموضوع تكرر كثيرًا من قبل .. ابحث في المواضيع القديمة عن ( تفقيط الأرقام ) وستجد ما تريد بإذن الله .

ماذا لو عدلت الكود ليصبح كالتالي : Private Sub Command1_Click() Text1 = "a" DoEvents For i = 1 To 100000000 Next Text1 = "b" End Sub

تأسف إدارة الفريق العربي لغلق الموضوع وذلك لمخالفته قوانين المشاركات، فقرة طلب حل الواجبات والتمارين وأعمال السنة. قواعد طرح المشاركات /index.php?showtopic=29343

الآن ظهر VB.net 2008 أو VB9 ولسه في ناس مترددين ينتقلوا إلى .Net أو على الأقل يتعلموه ، وكما قال أخي هاني فالانتقال سهل جدًا .. :)

بسم الله الرحمن الرحيم تمت الإجابة على الموضوع إدارة الفريق العربي للبرمجة

الكود الذي وضعته يعمل جيدًا ، ولكن يبدو أنك أخطأت سهوًا في امتداد الملف حيث أنه 1.mid و ليس 1.wav ..

غدًا هو اليوم المرتقب ... . .

ممكن توضيح أكثر عن الطريقة المستخدمة في الحجب ، يعني مثلاً هل قمت بالحجب باستخدام الملف Hosts ؟ أم ماذا ؟

مصدر آخر مصدر ثالث مصدر رابع :)

بسم الله الرحمن الرحيم اليوم المفتوح للمصادر المفتوحة Open Source Open Day يدعوكم نادي تقنية المعلومات و نادي هندسة النظم والحاسب الآلي في جامعة الملك فهد للبترول والمعادن لحضور برنامج اليوم المفتوح للمصادر المفتوحة Open Source Open Day والذي يقام يوم الاثنين …

أنا أيضًا كنت أعاني من هذه المشكلة مع Firefox .. ولكن بعد تجربة متصفح Opera ، كل الأمور تحت السيطرة :) صراحة أفضل المتصفحات التي جربتها هي Opera فـ Firefox . أما Internet Explorer فلا أنصح به أبدًا :) ... ودمتم سالمين ،،

بارك الله فيك أخي الكريم ،، ووفقك في كل امتحاناتك

السلام عليكم ،، إذا كنت قد ألغيت المشاركة فلا سبيل للوصول إلى ملفاتك بالطرق العادية . أما بالنسبة للطريقة التي ذكرتها باستخدام العلامة $ ، فلا أعتقد أنها تعمل ( هل جربتها ؟ ). لحماية أفضل استخدم جدار ناري مثل ZoneAlarm أو Kaspersky Internet Security.

يعني أنت تريد كود تغيير الـMAC ADDRESS ؟؟

بهذه الدالة يمكنك اغلاق أي برنامج عن طريق اسم الملف وذلك باستخدام دوال API ، يمكنك التعديل عليها حسب احتياجك : Private Declare Function Process32First Lib "kernel32.dll" (ByVal hSnapshot As Long, ByRef lppe As PROCESSENTRY32) As Long Private Declare Function P…

Private Function Vega() As String Set objWMIService = GetObject("winmgmts:\\") Set colItems = objWMIService.InstancesOf("Win32_DisplayConfiguration") For Each objItem In colItems Vega = "DriverVersion: " & objItem.DriverVersion Next End Function إذا أردت أن تس…

وأنا أيضًا لا أستطيع التحميل من RapidShare !! :(

السلام عليكم ،، للقيام بذلك قم بتغيير الـSub إلى دالة Function ، وستحصل على ما تريد : Private Function GetMemoryStatus() Dim tMS As MEMORYSTATUS tMS.dwLength = Len(tMS) GlobalMemoryStatus tMS GetMemoryStatus = Format$(tMS.dwTotalPhys / 1024, "###,###,###") & "…