تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] file code
#1
Sad 
احتاج مساعدتكم في هذا السؤال مطلوب 2 files الاول أقرأ منه والثاني اكتب فيه .

Write a program that will read information from MyList.txt file then create MyReceipt.txtfile. Suppose that a file MyList.txt contains the following data.
 
  هذا اسم الملف الاول الخاص بالقراءه MyList.txt
] [/url] ][/url]
 
 
 هذا الثاني الخاص بالكتابه And as result MyReceipt.txt file will be:
] [/url]
 
In MyList.txt, second line represent item name, item price, and if it is available in the store or not, respectively.
Note:
Use try and catch to handle the case when the input file does not exist, such that an appropriate message is displayed and the program terminates.
 

تكررت الصور اكثر من مره لا اعلم السبب اعتذر
الرد
تم الشكر بواسطة:
#2
السلام عليكم

تفضب الكود
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

    Dim l() As String = IO.File.ReadAllLines("MyList.txt")

    Dim r As New System.Text.StringBuilder

    r.AppendLine("My Receipt:")
    r.AppendLine("------------------------")

    Dim total As Double = 0

    For i = 0 To l.Length - 1

        If l(i).Contains("Done") Then

            Dim s As String = l(i).Replace("Done", "").Trim
            r.AppendLine(s)

            Dim v As Double = Val(s.Substring(s.LastIndexOf(" ")))
            total += v

        End If

    Next

    r.AppendLine("------------------------")
    r.AppendLine("Total = " & total)

    IO.File.WriteAllText("MyReceipt.txt", r.ToString)

    MsgBox(r.ToString)

End Sub
الرد
تم الشكر بواسطة: a_abdullah , a_abdullah


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخدام file upload montser 0 33 17-04-18, 06:41 PM
آخر رد: montser
  خطأ في Open File Dialog ibraheam 5 191 21-03-18, 12:28 AM
آخر رد: محمود صالح
  code speach to text in vb.net ebrahim yahya 0 25 22-02-18, 12:58 AM
آخر رد: ebrahim yahya
  تولديد qr code bar في تقارير RDLC ndjakoub 2 70 22-01-18, 02:31 PM
آخر رد: ndjakoub
  مشكلة في توليد arabic qr code osmana2005 5 789 21-01-18, 02:04 PM
آخر رد: ndjakoub
  [سؤال] مشكلة عند فتح open file dialog fouadmdany 1 82 30-12-17, 10:56 PM
آخر رد: طالب برمجة
  Could not load file or assembly 'CrystalDecisions.Enterprise.Framework dfouad 1 72 28-12-17, 02:43 PM
آخر رد: طالب برمجة
  الداتابيز اكسس لما بتتحط في program file تصبح للقراءة فقط [email protected] 1 81 02-11-17, 02:18 AM
آخر رد: boudyonline
  file resource ddemed 5 199 01-08-17, 03:46 AM
آخر رد: سعود
  [VB.NET] لدي سؤال بخصوص Code يتواصل مع الطابعة 0theghost0 0 146 23-07-17, 06:21 PM
آخر رد: 0theghost0

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


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