منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : هل من كود لكتابة التاريخ معدول
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
هل من كود غير هذا الكود المعقد الذى كتبته لكتابة التاريخ معدولآ

كود :
datte = CDate(Text1.Text)
dddd = Day(datte)
  mmmm = Month(datte)
    yyyy = Year(datte)

MMSG1 = "كان هذا بتاريخ " & yyyy & "/" & mmmm & "/" & dddd

Z = MsgBox((MMSG1), vbOKOnly, "")
لأنى حين كتبته مباشرة كالآتى ظهر التاريخ مقلوبآ
كود :
datte = CDate(Text1.Text)
MMSG1 = "كان هذا بتاريخ " & datte

Z = MsgBox((MMSG1), vbOKOnly, "")

ولكم ألف شكر
السلام عليكم ورحمة الله وبركاته

جرب الكود التالي

PHP كود :
Private Sub Command1_Click()
MsgBox "كان هذا بتاريخ " Format(Now"yyyy/mm/dd")
End Sub 

بالتوفيق
فعلآ هكذا يكتبه معدولا