تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود سحب النص من مستند نصي خارج المشروع
#1
نقوم بانشاء تكست بوكس وليكن بحجم كبير حتى يتمكن لنا ادراج نص طويل بداخلة ثم نقوم بانشاء زر لجلب التكست الخارجي ونقوم باضافة الكود التالي داخل الحدث click
كود :
Dim ahmad As New OpenFileDialog
        ahmad.Filter = "Text file (*.txt)|*.txt"
        ahmad.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.Desktop
        If ahmad.ShowDialog <> Windows.Forms.DialogResult.OK Then Exit Sub
        Dim myfile As String = ahmad.FileName
        Dim reader As New System.IO.StreamReader(myfile)
        TextBox1.Text = reader.ReadToEnd
الرد
تم الشكر بواسطة: elgokr , sendbad100 , الحمد لله , الحمد لله
#2
بارك الله فيك ،، بالتوفيق للجميع
بسم الله الرحمن الرحيم > "اللَّهُ نُورُ السَّمَاوَاتِ وَالْأَرْضِ ۚ مَثَلُ نُورِهِ كَمِشْكَاةٍ فِيهَا مِصْبَاحٌ ۖ الْمِصْبَاحُ فِي زُجَاجَةٍ ۖ الزُّجَاجَةُ كَأَنَّهَا كَوْكَبٌ دُرِّيٌّ يُوقَدُ مِن شَجَرَةٍ مُّبَارَكَةٍ زَيْتُونَةٍ لَّا شَرْقِيَّةٍ وَلَا غَرْبِيَّةٍ يَكَادُ زَيْتُهَا يُضِيءُ وَلَوْ لَمْ تَمْسَسْهُ نَارٌ ۚ نُّورٌ عَلَىٰ نُورٍ ۗ يَهْدِي اللَّهُ لِنُورِهِ مَن يَشَاءُ ۚ وَيَضْرِبُ اللَّهُ الْأَمْثَالَ لِلنَّاسِ ۗ وَاللَّهُ بِكُلِّ شَيْءٍ عَلِيمٌ" < صدق الله العظيم
الرد
تم الشكر بواسطة:
#3
استمر بارك الله بك
الرد
تم الشكر بواسطة: elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Wink كود صغير يقوم بقراءه النص من التكست بوكس برير مسبل 3 1,694 08-08-18, 03:55 PM
آخر رد: alsouf
  [VB.NET] مقارنة حجم النص المدخل بالمكان المخصص alsouf 0 326 25-09-17, 07:00 PM
آخر رد: alsouf
  كود بسيط لتغيير لون النص والخلفية لكل ليبل وا تيكست بوكس في الفرم honest 3 2,018 28-05-16, 11:58 PM
آخر رد: CLARO
  كود مختصر وبسيط لحفظ محتوى تيكست بوكس في مستند نصي honest 3 953 28-05-16, 11:57 PM
آخر رد: CLARO
  [مثال] قراءة النص باستخدام جوجل Google Text To Speech ameerah 0 964 01-04-15, 05:30 PM
آخر رد: ameerah

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


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