منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم احتاج مساعدة

كيف اخلي برنامجي يفتح ملف نصي و يعرضه في تكست بوكس

تكفون ساعدوني 

استخدم السطر التالي:

مع استبدال (d:\123.txt) بمسار و اسم الملف النصي عندك
للتذكير / يجب استخدام المجال (Imports System.IO)
تحياتي ..

ضع هذا الكود في Button

(26-11-16, 11:01 PM)فارس جراح كتب : [ -> ]ضع هذا الكود في Button

كود :

Dim op As New OpenFileDialog
       op.Filter = "*.txt|*.txt"
       If op.ShowDialog = Windows.Forms.DialogResult.OK Then
           TextBox1.Text = IO.File.ReadAllText(op.FileName)
       End If

جزاك الله خير 

(25-11-16, 12:28 AM)ابراهيم النعيمي كتب : [ -> ]استخدم السطر التالي:

PHP كود :

TextBox1.Text = File.ReadAllText("d:\123.txt") 


مع استبدال (d:\123.txt) بمسار و اسم الملف النصي عندك
للتذكير / يجب استخدام المجال (Imports System.IO)
تحياتي ..

معليش بس ما اشتغل الكود 

جرب