تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[طلب] ممكن حد يساعدني في هذه الاكواد؟
#1
السلام عليكم ورحمة الله وبركاته
..............................................................
عندي صندوقين نص (TextBox) في كل منهما نص معين اريد الاكواد الاتيه وجزاكم الله خيرا.
1 - كود يطبع النص في الصندوق الاول والثاني (يعني يطبع النص في الصندوق الاول وتحته النص في الصندوق الثاني)
2 - كود لحفظ النص في الصندوق الاول الى ملف نصي.
3-كود للبحث عن كلمة في صندوق النص الاول.


ارجو من الاخوان المساعدة ولكم جزيل الشكر....
الرد }}}}
تم الشكر بواسطة:
#2
لطباعة النصين

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            Dim PrintDoc As New PrintDocument
            AddHandler PrintDoc.PrintPage, AddressOf Print_Doc
            PrintDoc.Print()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
    Private Sub Print_Doc(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
        ev.Graphics.DrawString(TextBox1.Text & vbNewLine & TextBox2.Text, New Font("Arial", _
        11, FontStyle.Regular), Brushes.Black, 120, 120)

        ev.HasMorePages = False
    End Sub

للحفظ مافي صندوق النص الاول

كود :
If Not TextBox1.Text = "" Then
            Using W As IO.StreamWriter = IO.File.CreateText("مسار النص")
                W.Write(TextBox1.Text)
                W.Close()
            End Using
        End If

للبحث في صندوق النص الاول

كود :
If TextBox1.Text.Contains("3booody") Then
            MsgBox("الكلمة موجوده")
        End If
الرد }}}}
تم الشكر بواسطة:
#3
[SIZE=6]شكرا للك اخي 3booody انت فعلا رائع ومبدع بكل ما تعنيه الكلمة [/SIZE]
الرد }}}}
تم الشكر بواسطة:
#4
المهندس علي كتب :[SIZE=6]شكرا للك اخي 3booody انت فعلا رائع ومبدع بكل ما تعنيه الكلمة [/SIZE]

عفوآآ اخي العزيز واجبي شكرآ لك
الرد }}}}
تم الشكر بواسطة:
#5
أعضاء رائعين Smile

جزاكم الله خيراً ...


السلام عليكم
الرد }}}}
تم الشكر بواسطة:
#6
hoob computer كتب :أعضاء رائعين Smile

جزاكم الله خيراً ...


السلام عليكم

عليكم السلام وجودك الاروع وجزاك بالمثل
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ممكن طلب بسيط MOSTAFA.KAMEL 4 88 14-10-17, 05:36 AM
آخر رد: حريف برمجة
  [VB.NET] ممكن تعديل الكود التالي D-Z 0 65 21-09-17, 06:34 PM
آخر رد: D-Z
  [سؤال] ممكن طريقة عمل برنامج وارسال التحديثات اليه عندما يتوفر تحديث Mina Botros 3 125 20-09-17, 01:11 AM
آخر رد: سعود الشامان
  ممكن طريقه طباعه محتويات داتاجريد فيو من خلال الكريستال ريبورت hashish2003 7 276 11-09-17, 10:05 PM
آخر رد: hashish2003
Photo ممكن الرد ضرورى aliomar333 2 94 11-09-17, 09:55 PM
آخر رد: aliomar333
  [VB.NET] ممكن شرح بكل مايتعلق بـ DataGridView 0theghost0 1 131 08-09-17, 07:08 PM
آخر رد: جميل علي
  [VB.NET] ممكن طريقة قراءة ملف PDF سطر سطر و وضعه في Array الغلبان 9 641 22-08-17, 05:55 PM
آخر رد: Nabhan Alhashemy
Smile [VB.NET] ممكن مساعده امل 3 128 22-08-17, 04:44 PM
آخر رد: امل
  ايه فايدة التقاير لما ممكن اطبع الفورم ؟؟؟ نبيل كونكت 1 98 22-08-17, 11:59 AM
آخر رد: حريف برمجة
  [سؤال] ممكن حل مشاكل تقنية البرمجة Dev Express ابو روضة 6 242 06-08-17, 02:45 AM
آخر رد: ابو روضة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم