Format الكتابة فى ال MSGBOX حسب طول الكلام المكتوب فيه

[B]كيف أجعل الكلام المكتوب فى الmsgbox (سواء جملة عنوان الرسالة أو جملة الرسالة) فى منتصف الmsgbox دائمآ (لايكون فى الجانب الأيمن ولا فى الجانب الأيسر) مهما كان عرض الكلام المكتوب صغيرآ أو كبيرآ
هل من كود أو أى طريقة تقوم بذلك؟

هذا مثال بسيط لتوضيح معنى سؤالى
[/b]

	()Private Sub Command1_Click

	 "ما هذا"  = MMSG1
	 "أدخل أرقام فقط"  = MMSG2
	MsgBox (MMSG2), vbCritical, (MMSG1)	
       "هذا الرقم تكرر أكثر من ثلاث مرات" = MMSG2 
	 MsgBox (MMSG2), vbCritical, (MMSG1)	
	End Sub
         [B][SIZE="5"]    ولكم ألف شكر[/size][/b]

أما من حل لهذا الموضوع؟

[CENTER]لا تستطيع كتابة النص في المنتصف

الحل انك تنشا Form
تشبه ال MsgBox
وتضع فيها Label يغير مكانه حسب طول النص

او انك تضيف “فراغات” في نص الرسالة حتى يظهر النص في المنتصف

[/center]

جزاك الله خيرا