تقييم الموضوع :
  • 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 , الحمد لله , الحمد لله , dubai.eig
#2
بارك الله فيك ،، بالتوفيق للجميع
يا رحمن الدنيا والآخرة ورحيمهما
الرد
تم الشكر بواسطة:
#3
استمر بارك الله بك
الرد
تم الشكر بواسطة: elgokr



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


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