تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] فتح ملف نصي في التكست بوكس
#1
Wink 
مرحباً اعضاء وزوار الفيجوال بيسك لكل العرب  Heart هذا اول موضوع لي  Blush وهو كود لـ فتح ملف نصي في التكست بوكس

اولاً في اكواد الفورم لديك اول كود هو

كود :
Public Class Form1


اعلي هذا الكود قم بي اضافة الكود الاتي :-


كود :
Imports System.IO


الان نضيف اداة OpenFileDialog1 ثم نضع الكود الاتي في الزر Button
وضع به الكود :-

كود :
 Dim oReader As StreamReader

       OpenFileDialog1.CheckFileExists = True
       OpenFileDialog1.CheckPathExists = True
       OpenFileDialog1.DefaultExt = "txt"
       OpenFileDialog1.FileName = ""
       OpenFileDialog1.Filter = "Text Files (*.txt)|*.txt|All Files (*.*)|*.*"
       OpenFileDialog1.Multiselect = False

       If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
           oReader = New StreamReader(OpenFileDialog1.FileName, True)
           TextBox1.Text = oReader.ReadToEnd
       End If



انتهينا  Cool
الرد }}}}
تم الشكر بواسطة: khodor1985 , khodor1985 , أبوبكر سويدان
#2
يعطيك الصحة. بارك الله فيك.
اللهم ارحم فقيدنا ابا ليث

الرد }}}}
تم الشكر بواسطة:
#3
(27-08-16, 09:56 PM)أبوبكر سويدان كتب : يعطيك الصحة. بارك الله فيك.

شكرا لمرورك  Heart
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كود يسمح لك بكتابة احرف فقط في التيكست بوكس honest 13 2,842 25-05-17, 11:02 AM
آخر رد: Buseiligm
  كود سهل ومفيد للبحث عن كلمة في التكست بوكس honest 5 697 25-05-17, 09:27 AM
آخر رد: Buseiligm
Wink كود صغير يقوم بقراءه النص من التكست بوكس برير مسبل 2 967 25-01-17, 06:53 PM
آخر رد: ridha69
  التكست بوكس الشاغل تفكيرنا bassamreg 5 621 03-07-16, 07:01 AM
آخر رد: Apollondz
  [كود] هذا كود للكمبو بوكس يقوم بعرض البيانات داخل التيكست بوكس حسب الرقم احمد عبد الحكيم 4 1,440 30-06-16, 07:17 PM
آخر رد: aliday03
  كود بسيط لتغيير لون النص والخلفية لكل ليبل وا تيكست بوكس في الفرم honest 3 788 28-05-16, 11:58 PM
آخر رد: CLARO
  كود مختصر وبسيط لحفظ محتوى تيكست بوكس في مستند نصي honest 3 446 28-05-16, 11:57 PM
آخر رد: CLARO
  [سؤال] كود لو سمحتم قروب بوكس مخفية bidaya 4 460 06-05-16, 04:46 PM
آخر رد: bidaya
  مساعده بشأن الرابط بين الكومبوبوكس واللست بوكس hishamdaz 1 419 23-03-16, 03:00 AM
آخر رد: farahabdalrahmanfarah
Information [كود] مطلوب كود لجعل التكست بوكس يكتب عربي فقط Mostafa Yousry 2 796 07-12-15, 05:53 AM
آخر رد: Mostafa Yousry

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


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