+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تبديل او مسح حروف من التكست بوكس (/showthread.php?tid=16508)
تبديل او مسح حروف من التكست بوكس - Mohamed20 - 20-07-16
السلام عليكم
سؤالى هو هل يمكن تبديل او مسح حروف من التكست بوكس عندى ليست بوكس به هذا الكلام 1H2o.level of water 50%
2H2o.level of water 40%
3Fe.Weight iron 80
كيف يمكن مسح مثلآ H2o.level of water 50% الناتج يكون 1 H2o.level of water 40% الناتج يكون 2 Fe.Weight iron 80 الناتج يكون 3
RE: تبديل او مسح حروف من التكست بوكس - LoveVb - 20-07-16
يمكنك حذف عنصر في ليست بوكس عبر اسمه او رقمه Index
عبر اسمه : Listbox1.items.remove("Name")
عبر رقمه : Listbox1.items.removeat(0)
العد يبدا من 0
اذا كنت تريد حذف العنصر الاخير تضع بداخل الاقواس مجموعه العناصر - 1
Listbox1.items.count - 1
RE: تبديل او مسح حروف من التكست بوكس - Mohamed20 - 20-07-16
(20-07-16, 06:56 AM)LoveVb كتب : يمكنك حذف عنصر في ليست بوكس عبر اسمه او رقمه Indexشكرآ اخى تم تعديل العنوان الى تكست بوكس
عبر اسمه : Listbox1.items.remove("Name")
عبر رقمه : Listbox1.items.removeat(0)
العد يبدا من 0
اذا كنت تريد حذف العنصر الاخير تضع بداخل الاقواس مجموعه العناصر - 1
Listbox1.items.count - 1
انا جربت هذه الطريقة
كود :
Dim o As Object = CreateObject("ScriptControl")
o.Language = "VBScript"
Dim a As String = TextBox1.Text.Replace(TextBox1.Text.Substring(3, TextBox1.Text.Length - 3), "")
Dim b As String = a.Replace("H2", "+0")
TextBox2.Text = " مجموع العمليات" & o.Eval(b)
o = NothingRE: تبديل او مسح حروف من التكست بوكس - LoveVb - 20-07-16
اتمنى التوضيح اكثر
هذا النص سيكون في تكست بوكس 1
H2o.level of water 50%
H2o.level of water 40%
Fe.Weight iron 80
صحيح؟
والناتج في تكست بوكس 2 ماذا سيكون؟
RE: تبديل او مسح حروف من التكست بوكس - الوادي - 22-07-16
فعلا الموضوع غير واضح.
RE: تبديل او مسح حروف من التكست بوكس - mervandzz - 22-07-16
مفهمت كويس شو بتريد بس لو عاوز تغير زي المثال دا رايح ابعثلك السورس
