ذو النورين

لاحظ الكود التالي : Private Sub TextBox1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.GotFocus InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(New Globalization.CultureInfo("EN")) End Sub Private Sub TextBox2_Go…

أستاذي الفاضل محمد سامر أبو سلو هذه المعلومات وإن كانت قديمة إلا أنها مفيدة جدا جدا على الأقل بالنسبة لي وقد جاءت في وقتها . أملك الآن تطبيق يتألف من عدة نماذج وقد كنت بصدد إعداد دالة يتم استدعائها من أي نموذج يتم إغلاق البرنامج منه لأتأكد من إغلاق الملفات الم…

شكرا لمرورك أخي العزيز TareqVB نصيحة غالية وسأعمل بها إن شاء الله . لك مني أجمل تحية

يرفع مرة أخرى للتذكير

يرفع مرة أخرى :)

يرفع للتذكير

السلام عليكم الحقيقة ترددت كثيراً في مكان وضع المشاركة بين هذا المنتدى ومنتدى الأكسس وأرجو المعذرة إن أخطأت في تقديري . لدي برنامج مصمم باستخدام Visual Basic 2008 وهو مبني على Framework v2 . هذا البرنامج موجه للمعلمين وهذه فكرة عامة عن البرنامج : يجمع البرنامج…

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

وعليكم السلام ورحمة الله لا أعتقد أن المسألة تحتاج إلى فئة وعلى العموم هذه الفئة مقتصرة على ما طلبت : Public Class clsTemper Private Temp, Kel As Single Sub New() Me.Temperature = 0 End Sub Public Property Temperature() As Single Get Return Temp End Get Set(By…

أشكرك على المتابعة المستمرة وسرعة الرد أستاذي العزيز . كلما تعلمت شيئاً في الدوت نت علمت أنني أجهل الكثير :) لك أجمل التحايا

شكرا لسعة صدرك أستاذي الفاضل محمد سامر أبو سلو الغريب في الأمر أن استخدام الدالة MeasureString التابعة للوسيط الممرر للطباعة e يختلف عن استخدام نفس الدالة الخاصة بالرسم بمعنى آخر : Dim gr As Graphics = Me.CreateGraphics sz1 = e.Graphics.MeasureString(st, New F…

أستاذي الفاضل محمد سامر أبو سلو فعلا أساس هذا الكود في حدث الطباعة نقلته على هذا الشكل ليسهل تطبيقه . الآن لاحظ معي هذا الكود مقتبس من البرنامج الذي أقوم بإعداده الآن : Public Class Form1 Dim st As String Private Sub Button1_Click(ByVal sender As System.Object…

وعليكم السلام إذا كنت ستفترض أن عدد الأيام في كل شهر 30 يوماً فالأمر بسيط لاحظ الكود التالي : Dim M As Integer = R \ 30 Dim D As Integer = R Mod 30 R عدد الأيام التي تريد حساب عدد الشهور والأيام فيها . M عدد الشهور D عدد الأيام تحياتي

السلام عليكم في البداية أيها الاخوة وحتى يصحح لي المفهوم إن كنت مخطئ أعتقد أن استخدام : e.Graphics.TextRenderingHint = Drawing.Text.TextRenderingHint.AntiAlias أفضل من استخدام : e.Graphics.TextRenderingHint = Drawing.Text.TextRenderingHint.AntiAliasGridFit للم…

معلومات قيمة جداً أشكركم جميعا على هذه الجهود الكبيرة . الفكرة نجحت و الفضل يعود لله ثم لكم بالرغم من أن الكثير من الأسطر لم أفهمها لأني مبتدأ نوعاً ما ومع ذلك أنا في شوق كبير لفهم ما يجري :) تحياتي لكم جميعا

يرفع رفع الله قدركم :)

السلام عليكم طريقة تغيير الخط في الـ Label والـ TextBox معروفة ، ولكن ماذا عن عنوان النموذج نفسه ؟ هل هناك طريقة لتغيير الخط واللون في العنوان ؟ مع الشكر والتقدير للجميع

أخي الكريم hazzoom أشكر لك تواصلك في الرد كنت سأكتب في ردي السابق أنني من المبتدئين في البرمجة ولكن خشيت أن يكون ذلك محبطا لخبراء البرنامج :) تأكد أخي الكريم أنني قمت بالمحاولة عدة مرات قبل أن اكتب هذا الموضوع وأتعبك معي في هذه المشكلة التي ربما تراها بسيطة . …

الأخ الكريم hazzoom أشكرك في البداية على التفضل بالرد وبالنسبة للموضوع الذي تفضلت بوضع رابط له فقد أجاب عن أن فهمي لعمل البرنامج صحيح . لكن يبقى الآن السؤال الأهم والغير موضح في ذلك الموضوع كيف أستخدم البرنامج لتحويل برنامج إلى ملف قابل للتنفيذ على أي جهاز بغض…

السلام عليكم ورحمة الله وبركاته قرأت موضوعا عن برنامج xenocode يفيد بأن هذا البرنامج بإمكانه تشغيل ملفات Dot Net 2 على أجهزة أخرى لم تثبت فيها الدوت نت . سؤالي الآن هل ما فهمته صحيح ؟ كيف أقوم بذلك ؟ وهل البرنامج يدعم البرامج العربية ؟ تقبلوا تحياتي