تقييم الموضوع :
  • 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 4 2,316 03-02-19, 11:07 AM
آخر رد: alshandodi
  كود للانتقال الى التكست بوكس التالي عند الضغط على زر انتر ahmadpal 4 492 08-12-18, 02:38 PM
آخر رد: قناص المدينة
  كود سهل ومفيد للبحث عن كلمة في التكست بوكس honest 11 2,353 11-11-18, 01:27 AM
آخر رد: عماد السيد
  [كود] هذا كود للكمبو بوكس يقوم بعرض البيانات داخل التيكست بوكس حسب الرقم احمد عبد الحكيم 5 2,217 11-11-18, 01:24 AM
آخر رد: عماد السيد
Wink كود صغير يقوم بقراءه النص من التكست بوكس برير مسبل 3 1,817 08-08-18, 03:55 PM
آخر رد: alsouf
  السلام عليكم اريد كود لما تكون موجوده التكست بوكس ندير فوقها بطم وفي التنفيذ تطلعلي nosa 0 318 11-05-18, 09:36 PM
آخر رد: nosa
  كود يسمح لك بكتابة احرف فقط في التيكست بوكس honest 16 4,699 20-01-18, 10:55 AM
آخر رد: YousefOkasha
  [VB.NET] مطلوب كودات تصدير البيانات الناتجه من تكس بوكس الى الاكسل abdulla omran 0 474 18-11-17, 10:26 PM
آخر رد: abdulla omran
  تكست بوكس يسمح بإدخال أرقام فقط أو حروف فقط silverlight 1 639 15-10-17, 10:02 AM
آخر رد: سعود الشامان
  [كود] تغيير حجم التيكست بوكس عند الكتابة فيه سعود الشامان 1 645 02-10-17, 09:16 AM
آخر رد: ابو روضة

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


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