تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] اريد كود اسم الشهر
#1
Wink 
السلام عليكم
اريد كود عند اختيار تاريخ يطلق اسم الشهر فى تكست

شكرا لكم

مثال
يناير/2018
الرد
تم الشكر بواسطة:
#2
اذا كنت تريد جلب الشهر والسنة الحالية للجهاز :


كود :
TextBox1.Text = Date.Now.ToString("yyyy/MMM")

اما اذا كنت تريد إعادة فورمات التاريخ بواسطة تكست بوكس :


كود :
TextBox2.Text = CDate(TextBox2.Text).ToString("yyyy/MMM")
بسم الله الرحمن الرحيم > "اللَّهُ نُورُ السَّمَاوَاتِ وَالْأَرْضِ ۚ مَثَلُ نُورِهِ كَمِشْكَاةٍ فِيهَا مِصْبَاحٌ ۖ الْمِصْبَاحُ فِي زُجَاجَةٍ ۖ الزُّجَاجَةُ كَأَنَّهَا كَوْكَبٌ دُرِّيٌّ يُوقَدُ مِن شَجَرَةٍ مُّبَارَكَةٍ زَيْتُونَةٍ لَّا شَرْقِيَّةٍ وَلَا غَرْبِيَّةٍ يَكَادُ زَيْتُهَا يُضِيءُ وَلَوْ لَمْ تَمْسَسْهُ نَارٌ ۚ نُّورٌ عَلَىٰ نُورٍ ۗ يَهْدِي اللَّهُ لِنُورِهِ مَن يَشَاءُ ۚ وَيَضْرِبُ اللَّهُ الْأَمْثَالَ لِلنَّاسِ ۗ وَاللَّهُ بِكُلِّ شَيْءٍ عَلِيمٌ" < صدق الله العظيم
الرد
تم الشكر بواسطة: elgokr , elgokr , عبد العزيز البسكري
#3
ينقل الموضوع الى القسم المناسب له

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة:
#4
ويضا
كود :
Textbox1.text=now.month
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#5
هذا الكود المطلوب
كود :
   Private Sub ddat_chang()

       txt_year.Text = Format(ddet_date.Value, "yyyy")
       Dim mn As String
       Dim yy As String

       yy = ddet_date.Value.Year

       '1
       If ddet_date.Value.Month = 1 Then
           mn = "يناير -  "
           txt_month.Text = mn + yy
       End If
       '2
       If ddet_date.Value.Month = 2 Then
           mn = "فبراير - "
           txt_month.Text = mn + yy
       End If
       '3
       If ddet_date.Value.Month = 3 Then
           mn = "مارس -"
           txt_month.Text = mn + yy
       End If
       '4
       If ddet_date.Value.Month = 4 Then
           mn = "إبريل -"
           txt_month.Text = mn + yy
       End If
       '5
       If ddet_date.Value.Month = 5 Then
           mn = "مايو -"
           txt_month.Text = mn + yy
       End If
       '6
       If ddet_date.Value.Month = 6 Then
           mn = "يونيو - "
           txt_month.Text = mn + yy
       End If
       '7
       If ddet_date.Value.Month = 7 Then
           mn = "يوليو -"
           txt_month.Text = mn + yy
       End If
       '8
       If ddet_date.Value.Month = 8 Then
           mn = "أغسطس -"
           txt_month.Text = mn + yy
       End If
       '9
       If ddet_date.Value.Month = 9 Then
           mn = "ستمبر -"
           txt_month.Text = mn + yy
       End If

       '10
       If ddet_date.Value.Month = 10 Then
           mn = "أكتوبر -"
           txt_month.Text = mn + yy
       End If
       '11
       If ddet_date.Value.Month = 11 Then
           mn = " نوفمبر -"
           txt_month.Text = mn + yy

       End If
       '12
       If ddet_date.Value.Month = 12 Then
           mn = "ديسمبر -"
           txt_month.Text = mn + yy
       End If

   End Sub
الرد
تم الشكر بواسطة: new_programer


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد كود عرض الصورة من مسار فى اليست او جريد new_programer 13 303 24-04-19, 09:41 PM
آخر رد: elgokr
  [VB.NET] اريد دورة تصميم برنامج محاسبي من الصفر مع sql server mohamedhota 3 163 18-04-19, 07:52 PM
آخر رد: عبد العزيز البسكري
  [VB.NET] اريد كود للطباعة لأي نوع من انواع قواعد البيانات tarek 1 95 14-04-19, 02:53 PM
آخر رد: Rabeea Qbaha
  اريد اضافة بوتون داخل عمود فى الداتا جريد فيو سمير جمال 3 124 10-04-19, 12:24 PM
آخر رد: elgokr
  [VB.NET] اريد حذف السطرين المكررات من ملف نصي الـ ـجارح 5 149 01-04-19, 09:23 PM
آخر رد: بدري
  [سؤال] اريد شرح طريقة رفع قاعدة بيانات من نوع mysql ابو يوسف النواوي 2 6 189 27-03-19, 11:51 AM
آخر رد: أبوبكر سويدان
  اريد التحكم فى برنامجى عن بعد Lathe1 3 155 25-03-19, 01:28 PM
آخر رد: asemshahen5
  اريد تحويل هذا الكود للسى شارب لو سمحتم ابو روضة 2 156 17-03-19, 10:21 AM
آخر رد: ابو روضة
  اريد ظهور الفورم لمرة واحدة فقط سمير جمال 1 124 17-03-19, 04:12 AM
آخر رد: asemshahen5
  اريد انشاء قاعدة بيانات سمير جمال 2 148 14-03-19, 04:29 AM
آخر رد: سمير جمال

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم