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

نسخة كاملة : طريقة عمل زخرفة تلقائية
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
مرحباً بكم في اروع المواقع
وشكر للقائمين على هذا الموقع الرائع
أود اشغال تفكيركم لبضع دقائق
ومطلبي من الله ثم منكم
عن اعطائي فكرة 
عن كيفية
عمل برنامج زخرفة تلقائية
داخل textbox1
مربوطاً بـtimer
كمثال
ملاحظة اريد فقط امثلة وانا سوف اوضع الحروف مزخرفة من عندي
ولكن اريد زخرفة تختلف عن الاخري في كل مرة
وشـــــــــــــكراً Heart
لا اعلم في الحقيقة ولكن يمكن تعطيك فكرة
كود :
    Dim txt As String = "ABCDEFGHIJK ABCDEFGHIJK"

       MsgBox(Replace(txt, "AB", "Basil-Abdallah>>"))

       'Basil-Abdallah>>CDEFGHIJK ZZCDEFGHIJK  الناتج
قمنا باستبدال الحرفين AB بـ Basil-Abdallah>>

جرب استبدال الحروف بحروف اخرى مزخرفة