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

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

عندي سؤال بحثت عنه ولم استطع العثور على اجابة فإن كان الموضوع مطروح من قبل فالمعذرة.

المشكلة تكمن في التعامل مع النصوص العربية حيث انها لاتظهر كما يتم ترتيبها في الكود حاولت مع RSet  Lset Text.Alignment ولم تفلح جميع المحاولات

من اعدادات الفورم تم اختيار المحاذاة لليمين وكذلك مربع RichTextBox

عندي نص كما يلي :
كود :
Dim rules_b As String = "محيط الدائرة بحساب نصف القطر = "
           Dim rules_c As String = "2 نق ط  = "
           Dim roules_d As String = " X 2 "
           Dim roules_e As String = " 2 "
           RichTextBox1.Text = اريد النص العربي ان يظهر هنا
           
بالشكل التالي :
محيط الدائرة بحساب نصف القطر =
2 نق ط = 2 x نصف قطر الدائرة X  ط (3.14)
2 نق ط = cdbl(vlaue1) X textbox1.text X 2

مع تحياتي
أخيكم علي
PHP كود :
RichTextBox1.RightToLeft Windows.Forms.RightToLeft.Yes
Dim rules_b 
As String "محيط الدائرة بحساب نصف القطر = "
Dim rules_c As String "2 ط نق = "
Dim roules_d As String "2 × 3.14 × " Val(TextBox1.Text) & " = "
Dim roules_e As String Val(TextBox1.Text) * 3.14
RichTextBox1
.Text String.Concat(rules_brules_croules_droules_e
(16-10-17, 02:15 AM)a.ahmed كتب : [ -> ]
PHP كود :
RichTextBox1.RightToLeft Windows.Forms.RightToLeft.Yes
Dim rules_b 
As String "محيط الدائرة بحساب نصف القطر = "
Dim rules_c As String "2 ط نق = "
Dim roules_d As String "2 × 3.14 × " Val(TextBox1.Text) & " = "
Dim roules_e As String Val(TextBox1.Text) * 3.14
RichTextBox1
.Text String.Concat(rules_brules_croules_droules_e
تسلم ياغالي ولا عدمناك

فعلا عضو مبدع كما في عضويتك
HeartHeart