تقييم الموضوع :
  • 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 17 4,995 25-05-19, 04:12 PM
آخر رد: bakhcha
Lightbulb [VB.NET] ازالة الصوت عند الضغظ على الانتر للانتقال بين التكست بوكس EYADISMAIL 0 180 25-03-19, 02:18 AM
آخر رد: EYADISMAIL
  كود بسيط لتغيير لون النص والخلفية لكل ليبل وا تيكست بوكس في الفرم honest 4 2,893 03-02-19, 11:07 AM
آخر رد: alshandodi
  كود للانتقال الى التكست بوكس التالي عند الضغط على زر انتر ahmadpal 4 810 08-12-18, 02:38 PM
آخر رد: قناص المدينة
  كود سهل ومفيد للبحث عن كلمة في التكست بوكس honest 11 2,758 11-11-18, 01:27 AM
آخر رد: عماد السيد
  [كود] هذا كود للكمبو بوكس يقوم بعرض البيانات داخل التيكست بوكس حسب الرقم احمد عبد الحكيم 5 2,462 11-11-18, 01:24 AM
آخر رد: عماد السيد
Wink كود صغير يقوم بقراءه النص من التكست بوكس برير مسبل 3 1,972 08-08-18, 03:55 PM
آخر رد: alsouf
  السلام عليكم اريد كود لما تكون موجوده التكست بوكس ندير فوقها بطم وفي التنفيذ تطلعلي nosa 0 419 11-05-18, 09:36 PM
آخر رد: nosa
  [VB.NET] مطلوب كودات تصدير البيانات الناتجه من تكس بوكس الى الاكسل abdulla omran 0 578 18-11-17, 10:26 PM
آخر رد: abdulla omran
  تكست بوكس يسمح بإدخال أرقام فقط أو حروف فقط silverlight 1 791 15-10-17, 10:02 AM
آخر رد: سعود الشامان

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


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