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

نسخة كاملة : تنسيق الكتابة فى ال MSGBOX حسب طول الكلام
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيف أجعل الكلام المكتوب فى الmsgbox (سواء جملة عنوان الرسالة أو جملة الرسالة) فى منتصف الmsgbox دائمآ (لايكون فى الجانب الأيمن ولا فى الجانب الأيسر) مهما اختلف عرض الكلام المكتوب فيه
هل من كود أو أى طريقة تقوم بذلك؟

هذا مثال بسيط لتوضيح معنى سؤالى أرجو تعديله بحيث يكون الكلام المكتوب فى منتصف الMSGBOX
كود :
[size=large][b]Private Sub Command1_Click()
MMSG1 = "ماهذا؟ "
MMSG2 = "أدخل أرقام فقط"
MsgBox (MMSG2), vbCritical, (MMSG1)
MMSG2 = "هذا الرقم تكرر أكثر من ثلاث مرات"
MsgBox (MMSG2), vbCritical, (MMSG1)
End Sub[/b][/size]
[b][b]ولكم ألف شكر[/b][/b]
فى هذا المرقف لاأرى الكلام يتوسط الmsgbox
بل أجده يبدأ من اليمين تقريبآ
أريده فى منتصفه تمامآ كالزر ok
ألا يوجد أى  كود أو أى طريقة تقوم بذلك؟
أهلا أخي الكريم , هذا مثال يظهر لك فورم خاص كمسج بوكس بالمواصفات التي طلبتها عنوان الرسالة ونصها في منتصف الرسالة دائماً .
شكرآ لك
ولكنى حين عدلت جملة الMSG  بوضع أحد اختيارات الأزرار ( vbYesNo مثلآ )  هكذا
"أحمد منصور", vbYesNo, "منتدى الفجول بيسيط النص في العنوان والرسالة"zMsgBox
رفض تنفيذ الكود واعترض عليه
فلما عدلت جملة الMSG  بحذف حرف الz من بدايتها (ظنآ منى أنه خطأ كتابة) هكذا
 "أحمد منصور", vbYesNo, "منتدى الفجول بيسيط النص في العنوان والرسالة"MsgBox
نفذ الكود وكان نص الرسالة فعلآ يتوسط الmsgbox دائمآ(جربت أكثر من تجربة غيرت فيها نص الرسالة)
أما عنوان الرسالة(أحمد منصور) فكان لا يتوسطها ولكن كان على اليسار دائمآ
ولكم ألف شكر