تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اريد كود الكتابة في ملف txt في مكان محدد
#1
عفوا اخواني 
اريد كود الكتابة في مكان محدد في الملف txt
وليكن في اخر الملف
وشكرا للجميع
الرد }}
تم الشكر بواسطة: سعود
#2
(10-06-21, 04:23 AM)العواجي كتب : عفوا اخواني 
اريد كود الكتابة في مكان محدد في الملف txt
وليكن في اخر الملف
وشكرا للجميع

PHP كود :
Imports System.IO
Public Class Form1
    Dim txtpath 
As String IO.Path.GetDirectoryName(Application.ExecutablePath) & "\t.txt"
 
   Private Sub gd()
 
       ListBox1.Items.Clear()
 
       For Each h As String In My.Computer.FileSystem.ReadAllText(txtpath).Split(vbNewLine)
 
           If Trim(h.Trim).Trim <> "" Then
                ListBox1
.Items.Add(h.ToString.Trim)
 
           End If
 
       Next
    End Sub
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        If IO
.File.Exists(txtpath) = False Then
            IO
.File.CreateText(txtpath).Close()
 
       End If
 
       gd()
 
   End Sub
    Private Sub Button1_Click
(sender As ObjectAs EventArgsHandles Button1.Click
        If TextBox1
.Text.Trim <> "" Then
            Dim sr 
As StreamWriter
            sr 
IO.File.AppendText(txtpath)
 
           sr.WriteLine(TextBox1.Text)
 
           sr.Close()
 
       End If
 
       TextBox1.Clear()
 
       TextBox1.Focus()
 
       TextBox1.Select()
 
       gd()
 
   End Sub
End 
Class 
الرد }}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  بحث كود VB يبحث عن ملف محدد بإسم bilgacim 1 177 17-07-22, 10:17 PM
آخر رد: asmarsou
  [VB.NET] رجاء اريد كود فيجوال بحث عن ملف في كمبيوتر داخل فورم jam3h 5 902 06-07-22, 12:02 AM
آخر رد: jam3h
  [VB.NET] اريد كود يحسب من 1 الى 100 في تاكستبوكس bilgacim 4 369 14-06-22, 07:32 PM
آخر رد: أبو خالد الشكري
  اريد فهم الخطأ الحالى فى صلاحيات المستخدمين لدى حماده ممدوح البحيرى 9 659 16-05-22, 12:56 PM
آخر رد: سعود
  مشكل تداخل الكتابة بعد الطباعة ADAM12 0 200 12-05-22, 04:32 AM
آخر رد: ADAM12
  اريد صنع برنامج قراّن كريم sascoxat 10 1,298 04-04-22, 03:00 AM
آخر رد: sascoxat
  تعديل صورة مكان صورة محفوظة في قاعدة البيانات mustafa mohamed 2 941 26-03-22, 07:00 PM
آخر رد: mustafa mohamed
  [VB.NET] اريد مساعدة في كود التحقق من البيانات في قاعدة اكسس Safwan_Daw 2 851 22-03-22, 12:39 AM
آخر رد: Safwan_Daw
  [VB.NET] الكتابة على السي دي naseef 1 406 15-03-22, 05:48 PM
آخر رد: asmarsou
  السلام عليكم عندي ثلاث Button اريد عند اخفاء ال Button2 يتم ترحيل Button1 معButton3 ahmedhhh2 4 705 05-03-22, 01:18 PM
آخر رد: ahmedhhh2

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


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